From 83a54fc239f452860b9d4a2ff3f46232482fcdf9 Mon Sep 17 00:00:00 2001 From: Cayetano Santos Date: Tue, 16 Sep 2025 15:49:35 +0200 Subject: [PATCH] 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 --- 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 7b9e157f038..8f599389f44 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