guix_mirror_bot pushed a commit to branch master
in repository guix.
commit 83a54fc239f452860b9d4a2ff3f46232482fcdf9
Author: Cayetano Santos <[email protected]>
AuthorDate: Tue Sep 16 15:49:35 2025 +0200
gnu: hashcat-utils: Improve style.
* gnu/packages/password-utils.scm (hashcat-utils)[arguments]: Use
G-Expressions.
Change-Id: I770d386d35cb7f0461e87087cb129aeca9e6783e
Signed-off-by: Liliana Marie Prikler <[email protected]>
---
gnu/packages/password-utils.scm | 56 ++++++++++++++++++++---------------------
1 file changed, 28 insertions(+), 28 deletions(-)
diff --git a/gnu/packages/password-utils.scm b/gnu/packages/password-utils.scm
index 7b9e157f03..8f599389f4 100644
--- a/gnu/packages/password-utils.scm
+++ b/gnu/packages/password-utils.scm
@@ -1733,34 +1733,34 @@ password cracking.")
(list perl))
(build-system gnu-build-system)
(arguments
- `(#:tests? #f ;no tests
- #:make-flags (list "CC=gcc"
- ;; Upstream bug(?): "make all" seems to remove the
- ;; Perl scripts from the source.
- "native")
- #:phases
- (modify-phases %standard-phases
- (replace 'unpack
- (lambda* (#:key source #:allow-other-keys)
- (invoke "7z" "x" source)
- (chdir (string-append "hashcat-utils-" ,version "/src"))
- #t))
- (delete 'configure)
- (replace 'install
- (lambda* (#:key outputs #:allow-other-keys)
- (let ((out (string-append (assoc-ref outputs "out") "/bin")))
- (mkdir-p out)
- (for-each
- (lambda (file)
- (copy-file file (string-append out "/"
- (basename file ".bin"))))
- (find-files "." "\\.bin$"))
- (for-each
- (lambda (file)
- (copy-file file (string-append out "/"
- (basename file ".pl"))))
- (find-files "../bin" "\\.pl$"))
- #t))))))
+ (list
+ #:tests? #f ;no tests
+ #:make-flags
+ #~(list (string-append "CC=" #$(cc-for-target))
+ ;; Upstream bug(?): "make all" seems to remove the
+ ;; Perl scripts from the source.
+ "native")
+ #:phases
+ #~(modify-phases %standard-phases
+ (replace 'unpack
+ (lambda* (#:key source #:allow-other-keys)
+ (invoke "7z" "x" source)
+ (chdir (string-append #$name "-" #$version "/src"))))
+ (delete 'configure)
+ (replace 'install
+ (lambda _
+ (let ((out (string-append #$output "/bin")))
+ (mkdir-p out)
+ (for-each
+ (lambda (file)
+ (copy-file file (string-append out "/"
+ (basename file ".bin"))))
+ (find-files "." "\\.bin$"))
+ (for-each
+ (lambda (file)
+ (copy-file file (string-append out "/"
+ (basename file ".pl"))))
+ (find-files "../bin" "\\.pl$"))))))))
(home-page "https://github.com/hashcat/hashcat-utils/";)
(synopsis "Small utilities that are useful in advanced password cracking")
(description "Hashcat-utils are a set of small utilities that are useful
