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: docker: Substitute LookPath of literals generally.

Browse source 
* gnu/packages/docker.scm (docker)[arguments]<#:phases>[patch-paths]:
Substitute LookPath of literals generally.
This commit is contained in:
Danny Milosavljevic 2019-01-10 03:12:32 +01:00
parent e9b316453e
commit 65a7e35cb5
No known key found for this signature in database
GPG key ID: E71A35542C30BAA5
1 changed files with 8 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
gnu/packages/docker.scm
View file

@ -311,7 +311,14 @@ (define-public docker
(substitute-LookPath "blkid" "util-linux" "/sbin/blkid")
(substitute-LookPath "unpigz" "pigz" "/bin/unpigz")
(substitute-LookPath "iptables" "iptables" "/sbin/iptables")
(substitute-LookPath "ip" "iproute2" "/sbin/ip")))
(substitute-LookPath "ip" "iproute2" "/sbin/ip"))
;; Make compilation fail when, in future versions, Docker
;; invokes other programs we don't know about and thus don't
;; substitute.
(substitute* source-files
(("LookPath\\(\"zfs\"\\)") "LooxPath(\"zfs\")")
(("LookPath\\(\"") "Guix_doesnt_want_LookPath\\(\"")
(("LooxPath") "LookPath")))
#t))
(add-after 'patch-paths 'delete-failing-tests
(lambda _