ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 21:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: lsof: Use G-expressions.

Browse source 
* gnu/packages/lsof.scm (lsof)[arguments]: Use G-expressions.

Change-Id: Id086d46c5dbef6028e5eae4df1d2f0b24d4c3d76
This commit is contained in:
Zheng Junjie 2024-10-06 01:33:48 +08:00
parent 05da43104c
commit 780fdb61f6
No known key found for this signature in database
GPG key ID: 3B5AA993E1A2DFF0
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/lsof.scm
View file

@ -25,6 +25,7 @@ (define-module (gnu packages lsof)
#:use-module (guix packages)
#:use-module (guix git-download)
#:use-module (guix build-system gnu)
#:use-module (guix gexp)
#:use-module (guix utils)
#:use-module (gnu packages)
#:use-module (gnu packages autotools)
@ -56,23 +57,24 @@ (define-public lsof
procps ;for ps
util-linux)) ;for unshare
(arguments
`(#:phases (modify-phases %standard-phases
(add-after 'unpack 'fix-configure-ac-version
;; see https://github.com/lsof-org/lsof/commit/932a0b3b1992497e23fd9b8d31116b9ca9b0f98d
;; to fix tests/case-01-version.bash test fail.
(lambda _
(substitute* "configure.ac"
(("4\\.99\\.0")
"4.99.3"))))
(add-before 'bootstrap 'disable-failing-tests
(lambda _
(substitute* "Makefile.am"
;; Fails with ‘ERROR!!! client gethostbyaddr() failure’.
(("(TESTS \\+=.*) tests/LTsock" _ prefix)
prefix)
;; Fails because /proc not mounted in sandbox
(("\tdialects/linux/tests/case-20-epoll.bash \\\\")
"\\")))))))
(list #:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-configure-ac-version
;; see https://github.com/lsof-org/lsof/commit/932a0b3b1992497e23fd9b8d31116b9ca9b0f98d
;; to fix tests/case-01-version.bash test fail.
(lambda _
(substitute* "configure.ac"
(("4\\.99\\.0")
"4.99.3"))))
(add-before 'bootstrap 'disable-failing-tests
(lambda _
(substitute* "Makefile.am"
;; Fails with ‘ERROR!!! client gethostbyaddr() failure’.
(("(TESTS \\+=.*) tests/LTsock" _ prefix)
prefix)
;; Fails because /proc not mounted in sandbox
(("\tdialects/linux/tests/case-20-epoll.bash \\\\")
"\\")))))))
(synopsis "Display information about open files")
(description
"Lsof stands for LiSt Open Files, and it does just that.