GNU bug report logs - #77181
[PATCH 0/5] gnu: Fix bash completion directories.

Previous Next

Full log

Message #44 received at 77181 <at> debbugs.gnu.org (full text, mbox):

From: Efraim Flashner <efraim <at> flashner.co.il>
To: 77181 <at> debbugs.gnu.org
Cc: 45mg <45mg.writes <at> gmail.com>, Ian Eure <ian <at> retrospec.tv>
Subject: [PATCH v2 3/6] gnu: ouch: Fix shell completion directories.
Date: Thu, 27 Mar 2025 10:46:42 +0200

From: 45mg <45mg.writes <at> gmail.com>

* gnu/packages/rust-apps.scm (ouch) [arguments]: Use the shell
completion directory variables.

Change-Id: I63f2be695e9d8dc15de61bbbb470c54e47a6a197
---
 gnu/packages/rust-apps.scm | 20 ++++++--------------
 1 file changed, 6 insertions(+), 14 deletions(-)

diff --git a/gnu/packages/rust-apps.scm b/gnu/packages/rust-apps.scm
index 2f933d836c5..0371fd4c264 100644
--- a/gnu/packages/rust-apps.scm
+++ b/gnu/packages/rust-apps.scm
@@ -2348,25 +2348,17 @@ (define-public ouch
           (lambda* (#:key outputs #:allow-other-keys)
             (let* ((out (assoc-ref outputs "out"))
                    (share (string-append out "/share"))
-                   (bash-completions-dir
-                    (string-append out "/etc/bash-completion.d"))
-                   (zsh-completions-dir
-                    (string-append share "/zsh/site-functions"))
-                   (fish-completions-dir
-                    (string-append share "/fish/vendor_completions.d"))
-                   (elvish-completions-dir
-                    (string-append share "/elvish/lib"))
                    (man1 (string-append share "/man/man1")))
-              (mkdir-p bash-completions-dir)
-              (mkdir-p elvish-completions-dir)
+              (mkdir-p (string-append out ,bash-completion-dir))
+              (mkdir-p (string-append out ,elvish-completion-dir))
               (copy-file "target/ouch.bash"
-                         (string-append bash-completions-dir "/ouch"))
+                         (string-append out ,bash-completion-dir "ouch"))
               (install-file "target/_ouch"
-                            (string-append zsh-completions-dir "/_ouch"))
+                            (string-append out ,zsh-completion-dir))
               (install-file "target/ouch.fish"
-                            fish-completions-dir)
+                            (string-append out ,fish-completion-dir))
               (copy-file "target/ouch.elv"
-                         (string-append elvish-completions-dir "/ouch"))
+                         (string-append out ,elvish-completion-dir "ouch"))
               (for-each (lambda (manpage)
                           (install-file manpage man1))
                         (find-files "target" "\\.1$"))))))))
-- 
Efraim Flashner   <efraim <at> flashner.co.il>   אפרים פלשנר
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.