~ruther/guix-local: gnu: mkp224o: Improve style.

769000e99e3ca02887e7ce966335843a11b93529 — Cayetano Santos 4 months ago 30ed6ed

gnu: mkp224o: Improve style.

* gnu/packages/crypto.scm (mkp224o)[arguments]: Use G-Expressions.

Change-Id: Ied7bd905133ec1b13275ff82af916aacfbd4e014

patch browse .tar.gz

1 files changed, 10 insertions(+), 12 deletions(-)

M gnu/packages/crypto.scm

M gnu/packages/crypto.scm => gnu/packages/crypto.scm +10 -12

@@ 1455,18 1455,16 @@ SHA-256, SHA-512, and WHIRLPOOL hashes.")
               (file-name (git-file-name name version))))
     (build-system gnu-build-system)
     (arguments
-     `(#:tests? #f ; no test suite
-       #:phases
-       (modify-phases %standard-phases
-         (add-before 'configure 'set-cflags
-           (lambda _
-             (setenv "CFLAGS" "-O3")))
-         (replace 'install
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let* ((outdir (assoc-ref outputs "out"))
-                    (bindir (string-append outdir "/bin")))
-               (install-file "mkp224o" bindir)
-               #t))))))
+     (list
+      #:tests? #f ; no test suite
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'configure 'set-cflags
+            (lambda _
+              (setenv "CFLAGS" "-O3")))
+          (replace 'install
+            (lambda _
+              (install-file "mkp224o" (string-append #$output "/bin")))))))
     (native-inputs
      (list autoconf))
     (inputs