guix_mirror_bot pushed a commit to branch emacs-team
in repository guix.

commit 436a21dc145e17e7d52aa45d67eff23a41bd3d85
Author: Nicolas Graves <ngra...@ngraves.fr>
AuthorDate: Sun May 18 10:16:19 2025 +0200

    gnu: emacs-fish-completion: Improve style.
    
    * gnu/packages/emacs-xyz.scm (emacs-fish-completion):
      [arguments]<phases>: Improve 'configure phase style.
    
    Signed-off-by: Ian Eure <i...@retrospec.tv>
---
 gnu/packages/emacs-xyz.scm | 16 ++++++----------
 1 file changed, 6 insertions(+), 10 deletions(-)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 42d54597f8..a26c4866a8 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -30546,20 +30546,16 @@ cohesion with the Emacs Way.")
         (base32
          "17lqip1i1rrsvxzz4bx9rqf1fvwd3hriwg3sj6qxmfc8pylnp37q"))))
     (build-system emacs-build-system)
-    (inputs (list fish))
     (arguments
      `(#:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'configure
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let ((fish (assoc-ref inputs "fish")))
-               ;; Specify the absolute file names of the various
-               ;; programs so that everything works out-of-the-box.
-               (make-file-writable "fish-completion.el")
-               (emacs-substitute-variables
-                   "fish-completion.el"
-                 ("fish-completion-command"
-                  (string-append fish "/bin/fish")))))))))
+           (lambda* (#:key inputs #:allow-other-keys)
+             (make-file-writable "fish-completion.el")
+             (emacs-substitute-variables "fish-completion.el"
+               ("fish-completion-command"
+                (search-input-file inputs "bin/fish"))))))))
+    (inputs (list fish))
     (home-page
      "https://gitlab.com/Ambrevar/emacs-fish-completion";)
     (synopsis "Fish completion for Emacs pcomplete")

Reply via email to