TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: spiped: Use G-expressions.

Browse source 
* gnu/packages/networking.scm (spiped)[arguments]:
Rewrite as G-expressions.
This commit is contained in:
Tobias Geerinckx-Rice 2023-07-16 02:00:03 +02:00
parent 7fcd97b779
commit a18d57d1f8
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 21 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

44
gnu/packages/networking.scm
View file

@ -2985,30 +2985,28 @@ (define-public spiped
"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")