guix_mirror_bot pushed a commit to branch master
in repository guix.
commit 18898ea4e55b9ce705bf5a0bfb4ce76249769f1f
Author: Efraim Flashner <[email protected]>
AuthorDate: Mon Feb 23 13:36:36 2026 +0200
gnu: tealdeer: Rewrite install-completions phase.
* gnu/packages/rust-apps.scm (tealdeer)[arguments]: Rewrite using
g-exps. Rewrite 'install-completions to use the copy-build-system
'install phase.
Change-Id: Ia1ae3810796768856f5294e7dafed49dc989f2ab
---
gnu/packages/rust-apps.scm | 60 ++++++++++++++++++++++++----------------------
1 file changed, 31 insertions(+), 29 deletions(-)
diff --git a/gnu/packages/rust-apps.scm b/gnu/packages/rust-apps.scm
index 6f61ffee0b..73bcd4a44e 100644
--- a/gnu/packages/rust-apps.scm
+++ b/gnu/packages/rust-apps.scm
@@ -3725,37 +3725,39 @@ window manager.")
"1d3877y9g1v6gi8a326d6wfz7z52qkrl70zi5ry7ybh5q6jha6a3"))))
(build-system cargo-build-system)
(arguments
- `(#:phases
- (modify-phases %standard-phases
- (add-after 'install 'install-completions
- (lambda* (#:key outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out"))
- (bash (string-append out "/etc/bash_completion.d/"))
- (fish (string-append out
"/share/fish/vendor_completions.d/"))
- (zsh (string-append out "/share/zsh/site-functions/")))
- (mkdir-p bash)
- (mkdir-p fish)
- (mkdir-p zsh)
- (copy-file "completion/bash_tealdeer"
- (string-append bash "tealdeer"))
- (copy-file "completion/fish_tealdeer"
- (string-append fish "tealdeer.fish"))
- (copy-file "completion/zsh_tealdeer"
- (string-append zsh "_tealdeer"))))))
+ (list
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'install 'install-completions
+ (lambda args
+ (apply (assoc-ref copy:%standard-phases 'install)
+ #:install-plan
+ '(("completion/bash_tealdeer"
+ "share/bash-completion/completions/tealdeer")
+ ("completion/fish_tealdeer"
+ "share/fish/vendor_completions.d/tealdeer.fish")
+ ("completion/zsh_tealdeer"
+ "share/zsh/site-functions/_tealdeer"))
+ args))))
#:install-source? #f
+ #:imported-modules (append %copy-build-system-modules
+ %cargo-build-system-modules)
+ #:modules '((guix build cargo-build-system)
+ ((guix build copy-build-system) #:prefix copy:)
+ (guix build utils))
#:cargo-test-flags
- '("--"
- ;; These tests go to the network
- "--skip=test_quiet_old_cache"
- "--skip=test_quiet_cache"
- "--skip=test_quiet_failures"
- "--skip=test_pager_flag_enable"
- "--skip=test_markdown_rendering"
- "--skip=test_spaces_find_command"
- "--skip=test_autoupdate_cache"
- "--skip=test_update_language_arg"
- "--skip=test_update_cache"
- "--skip=test_create_cache_directory_path")))
+ '(list "--"
+ ;; These tests go to the network
+ "--skip=test_quiet_old_cache"
+ "--skip=test_quiet_cache"
+ "--skip=test_quiet_failures"
+ "--skip=test_pager_flag_enable"
+ "--skip=test_markdown_rendering"
+ "--skip=test_spaces_find_command"
+ "--skip=test_autoupdate_cache"
+ "--skip=test_update_language_arg"
+ "--skip=test_update_cache"
+ "--skip=test_create_cache_directory_path")))
(native-inputs
(list pkg-config))
(inputs
