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

gnu: traceroute: Use G-expressions.

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

36
gnu/packages/networking.scm
View file

@ -4210,23 +4210,25 @@ (define-public traceroute
(base32 "07svkglyizxirgcmv6d4ih59f3ds8pnyprvkrqcf5d3p567jcz2h"))))
(build-system gnu-build-system)
(arguments
`(#:tests? #f ;no test suite
#:make-flags
(list (string-append "LIBRARY_PATH="
(assoc-ref %build-inputs "libc") "/lib")
(string-append "CFLAGS=-I"
(assoc-ref %build-inputs "kernel-headers")
"/include")
"LDFLAGS=-lm -L../libsupp"
(string-append "prefix=" (assoc-ref %outputs "out")))
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-make
(lambda _
(substitute* "default.rules"
((" \\$\\(LIBDEPS\\)") "$(filter-out -l%,$(LIBDEPS))"))))
(delete 'bootstrap) ;no configure.ac file
(delete 'configure)))) ;no configure script
(list
#:tests? #f ; no test suite
#:make-flags
#~(list (string-append "LIBRARY_PATH="
(assoc-ref %build-inputs "libc") "/lib")
(string-append "CFLAGS=-I"
(assoc-ref %build-inputs "kernel-headers")
"/include")
"LDFLAGS=-lm -L../libsupp"
(string-append "prefix=" #$output))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-make
(lambda _
(substitute* "default.rules"
((" \\$\\(LIBDEPS\\)")
"$(filter-out -l%,$(LIBDEPS))"))))
(delete 'bootstrap) ; no configure.ac file
(delete 'configure)))) ; no configure script
(home-page "https://traceroute.sourceforge.net/")
(synopsis "Tracks the route taken by packets over an IP network")
(description "This package provides a modern, but Linux-specific