gnu: duplicity: Use ‘search-input-file’.
* gnu/packages/backup.scm (duplicity)[arguments]: In ‘use-store-file-names’ phase, use ‘search-input-file’. Change-Id: I4b66a22283fc6e426377ad9f4f4c451598eb74e0
This commit is contained in:
parent
f7995b6644
commit
ad40a5d0e2
|
@ -146,12 +146,14 @@ (define-public duplicity
|
||||||
(lambda* (#:key inputs #:allow-other-keys)
|
(lambda* (#:key inputs #:allow-other-keys)
|
||||||
(substitute* "duplicity/gpginterface.py"
|
(substitute* "duplicity/gpginterface.py"
|
||||||
(("self.call = u'gpg'")
|
(("self.call = u'gpg'")
|
||||||
(string-append "self.call = '" (assoc-ref inputs "gnupg") "/bin/gpg'")))
|
(string-append "self.call = '"
|
||||||
|
(search-input-file inputs "/bin/gpg")
|
||||||
|
"'")))
|
||||||
(substitute* "duplicity/backends/giobackend.py"
|
(substitute* "duplicity/backends/giobackend.py"
|
||||||
(("subprocess.Popen\\(\\[u'dbus-launch'\\]")
|
(("subprocess.Popen\\(\\[u'dbus-launch'\\]")
|
||||||
(string-append "subprocess.Popen([u'"
|
(string-append "subprocess.Popen([u'"
|
||||||
(assoc-ref inputs "dbus")
|
(search-input-file inputs "/bin/dbus-launch")
|
||||||
"/bin/dbus-launch']")))
|
"']")))
|
||||||
(substitute* '("testing/functional/__init__.py"
|
(substitute* '("testing/functional/__init__.py"
|
||||||
"testing/overrides/bin/lftp")
|
"testing/overrides/bin/lftp")
|
||||||
(("/bin/sh") (which "sh")))))
|
(("/bin/sh") (which "sh")))))
|
||||||
|
|
Loading…
Reference in a new issue