12/15: gnu: emacs-envrc: Add DIRENV as an input.

[guix-commits]

ngz pushed a commit to branch master
in repository guix.

commit 42115d5d674893ddfbb962c409f0fadd5d642a2f
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Tue Apr 18 15:10:42 2023 +0200

    gnu: emacs-envrc: Add DIRENV as an input.
    
    * gnu/packages/emacs-xyz.scm (emacs-envrc)[arguments]<#:phases>: Set direnv
    executable location.
    <#:tests?, #:test-command>: Tentatively run tests, without success.  At 
least,
    they do not complain "direnv" executable is nowhere to be found.
    [inputs]: Add DIRENV.
---
 gnu/packages/emacs-xyz.scm | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 8f55356777..5931a9e07d 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -19460,6 +19460,21 @@ from within Elisp using a DSL similar to CSS 
selectors.")
         (base32
          "0vjk8k5k9xsngk50nf611c4j0bikqn9l1y3m35s8y3knwqw22ii0"))))
     (build-system emacs-build-system)
+    (arguments
+     (list
+      #:tests? #false                   ;FIXME: 8 out of 11 tests fail
+      #:test-command #~(list "emacs" "-Q" "--batch"
+                             "-l" "envrc-tests.el"
+                             "-f" "ert-run-tests-batch-and-exit")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'set-direnv-location
+            (lambda* (#:key inputs #:allow-other-keys)
+              (emacs-substitute-variables "envrc.el"
+                ("envrc-direnv-executable"
+                 (search-input-file inputs "/bin/direnv"))))))))
+    (inputs
+     (list direnv))
     (propagated-inputs
      (list emacs-inheritenv))
     (home-page "https://github.com/purcell/envrc";)