~ruther/guix-local: gnu: emacs-direnv: Use new style.

b1cfd7a40b52b7f5bef58785b8567e8f43f257ac — Nicolas Goaziou 4 years ago d1b4353

gnu: emacs-direnv: Use new style.

* gnu/packages/emacs-xyz.scm (emacs-direnv)[arguments]: Use SEARCH-INPUT.
[propagated-inputs]: Remove labels.

patch browse .tar.gz .zip

1 files changed, 3 insertions(+), 6 deletions(-)

M gnu/packages/emacs-xyz.scm

M gnu/packages/emacs-xyz.scm => gnu/packages/emacs-xyz.scm +3 -6

@@ 2927,16 2927,13 @@ overlay below or above the point.  Corfu can be considered the minimalistic
        (modify-phases %standard-phases
          (add-after 'unpack 'patch-in-direnv
            (lambda* (#:key inputs #:allow-other-keys)
-             (let* ((direnv-path (assoc-ref inputs "direnv"))
-                    (direnv-bin (string-append
-                                 "\"" direnv-path "/bin/direnv\"")))
+             (let ((direnv (search-input-file inputs "/bin/direnv")))
                (substitute* "direnv.el"
-                 (("\"direnv\"") direnv-bin))))))))
+                 (("\"direnv\"") (string-append "\"" direnv "\"")))))))))
     (inputs
      (list direnv))
     (propagated-inputs
-     `(("dash" ,emacs-dash)
-       ("with-editor" ,emacs-with-editor)))
+     (list emacs-dash emacs-with-editor))
     (home-page "https://github.com/wbolster/emacs-direnv")
     (synopsis "Direnv integration for Emacs")
     (description