diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-07-16 02:00:03 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-07-16 02:00:01 +0200 |
| commit | a18d57d1f8ae6a39941a84998bddaf361053aa07 (patch) | |
| tree | a3ba8f81c75553baa2be643652fddb10a2e7d074 | |
| parent | 7fcd97b77979a5083ed64e6fad137c1ad5716e4d (diff) | |
| download | guix-a18d57d1f8ae6a39941a84998bddaf361053aa07.tar.gz | |
gnu: spiped: Use G-expressions.
* gnu/packages/networking.scm (spiped)[arguments]: Rewrite as G-expressions.
| -rw-r--r-- | gnu/packages/networking.scm | 44 |
1 files changed, 21 insertions, 23 deletions
diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm index b885e73dcd..a490fafb5c 100644 --- a/gnu/packages/networking.scm +++ b/gnu/packages/networking.scm @@ -2985,30 +2985,28 @@ enabled due to license conflicts between the BSD advertising clause and the GPL. "0rs5403bp48wyy2x0f3hk0f75ds1qn03sgyli2c7y7fi29ynim05")))) (build-system gnu-build-system) (arguments - `(#:test-target "test" - #:make-flags (let* ((out (assoc-ref %outputs "out")) - (bindir (string-append out "/bin")) - (man1dir (string-append out "/share/man/man1"))) - (list ,(string-append "CC=" (cc-for-target)) ; It tries to invoke `c99`. - (string-append "BINDIR=" bindir) - (string-append "MAN1DIR=" man1dir))) - #:phases - (modify-phases %standard-phases - (add-after 'unpack 'patch-command-invocations - (lambda _ - (substitute* '("Makefile" - "libcperciva/cpusupport/Build/cpusupport.sh" - "libcperciva/POSIX/posix-cflags.sh" - "libcperciva/POSIX/posix-l.sh") - (("command -p") "")))) - (delete 'configure) ; No ./configure script. - (add-after 'install 'install-more-docs - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref %outputs "out")) - (misc (string-append out "/share/doc/spiped"))) - (install-file "DESIGN.md" misc))))))) + (list + #:test-target "test" + #:make-flags + #~(list (string-append "CC=" #$(cc-for-target)) + (string-append "BINDIR=" #$output "/bin") + (string-append "MAN1DIR=" #$output "/share/man/man1")) + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-command-invocations + (lambda _ + (substitute* '("Makefile" + "libcperciva/cpusupport/Build/cpusupport.sh" + "libcperciva/POSIX/posix-cflags.sh" + "libcperciva/POSIX/posix-l.sh") + (("command -p") "")))) + (delete 'configure) ; no ./configure script + (add-after 'install 'install-more-docs + (lambda _ + (install-file "DESIGN.md" + (string-append #$output "/share/doc/spiped"))))))) (native-inputs - (list procps)) ; `ps` is used by the test suite. + (list procps)) ; `ps` is used by the test suite (inputs (list openssl)) (home-page "https://www.tarsnap.com/spiped.html") |