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

gnu: lsof: Return #t from all phases.

Browse source 
* gnu/packages/lsof.scm (lsof)[arguments]: Return #t from phases.
This commit is contained in:
Marius Bakke 2018-07-12 16:38:20 +02:00
parent b9ffa82b96
commit 6f6f9ef0ce
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gnu/packages/lsof.scm
View file

@ -73,14 +73,16 @@ (define-public lsof
(add-after 'configure 'patch-timestamps (add-after 'configure 'patch-timestamps
(lambda _ (lambda _
(substitute* "Makefile" (substitute* "Makefile"
(("`date`") "`date --date=@1`")))) (("`date`") "`date --date=@1`"))
#t))
(add-before 'check 'disable-failing-tests (add-before 'check 'disable-failing-tests
(lambda _ (lambda _
(substitute* "tests/Makefile" (substitute* "tests/Makefile"
;; Fails with ‘ERROR!!! client gethostbyaddr() failure’. ;; Fails with ‘ERROR!!! client gethostbyaddr() failure’.
(("(STDTST=.*) LTsock" _ prefix) prefix) (("(STDTST=.*) LTsock" _ prefix) prefix)
;; Fails without access to a remote NFS server. ;; Fails without access to a remote NFS server.
(("(OPTTST=.*) LTnfs" _ prefix) prefix)))) (("(OPTTST=.*) LTnfs" _ prefix) prefix))
#t))
(replace 'check (replace 'check
(lambda _ (lambda _
(with-directory-excursion "tests" (with-directory-excursion "tests"