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

1 files changed, 5 insertions, 3 deletions

diff --git a/gnu/packages/backup.scm b/gnu/packages/backup.scm
index f10c7914d5..5aa0d5688f 100644
--- a/gnu/packages/backup.scm
+++ b/gnu/packages/backup.scm
@@ -146,12 +146,14 @@
            (lambda* (#:key inputs #:allow-other-keys)
              (substitute* "duplicity/gpginterface.py"
                (("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"
                (("subprocess.Popen\\(\\[u'dbus-launch'\\]")
                 (string-append "subprocess.Popen([u'"
-                               (assoc-ref inputs "dbus")
-                               "/bin/dbus-launch']")))
+                               (search-input-file inputs "/bin/dbus-launch")
+                               "']")))
              (substitute* '("testing/functional/__init__.py"
                             "testing/overrides/bin/lftp")
                (("/bin/sh") (which "sh")))))