gnu: docker: Refer to xz by its absolute path.
* gnu/packages/docker.scm (docker)[inputs]: Add xz. [phases]{patch-paths}: Patch the reference to xz.
This commit is contained in:
parent
80fec17f39
commit
59781b32d8
|
@ -368,6 +368,9 @@ built-in registry server of Docker.")
|
||||||
(string-append "var userlandProxyCommandName = \""
|
(string-append "var userlandProxyCommandName = \""
|
||||||
(assoc-ref inputs "docker-proxy")
|
(assoc-ref inputs "docker-proxy")
|
||||||
"/bin/proxy\"\n")))
|
"/bin/proxy\"\n")))
|
||||||
|
(substitute* "pkg/archive/archive.go"
|
||||||
|
(("string\\{\"xz")
|
||||||
|
(string-append "string{\"" (assoc-ref inputs "xz") "/bin/xz")))
|
||||||
(let ((source-files (filter (lambda (name)
|
(let ((source-files (filter (lambda (name)
|
||||||
(not (string-contains name "test")))
|
(not (string-contains name "test")))
|
||||||
(find-files "." "\\.go$"))))
|
(find-files "." "\\.go$"))))
|
||||||
|
@ -528,7 +531,8 @@ built-in registry server of Docker.")
|
||||||
("runc" ,runc)
|
("runc" ,runc)
|
||||||
("util-linux" ,util-linux)
|
("util-linux" ,util-linux)
|
||||||
("lvm2" ,lvm2)
|
("lvm2" ,lvm2)
|
||||||
("xfsprogs" ,xfsprogs)))
|
("xfsprogs" ,xfsprogs)
|
||||||
|
("xz" ,xz)))
|
||||||
(native-inputs
|
(native-inputs
|
||||||
`(("eudev" ,eudev) ; TODO: Should be propagated by lvm2 (.pc -> .pc)
|
`(("eudev" ,eudev) ; TODO: Should be propagated by lvm2 (.pc -> .pc)
|
||||||
("go" ,go)
|
("go" ,go)
|
||||||
|
|
Loading…
Reference in New Issue