mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-22 10:16:45 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: procs: Build shell completions.

Browse source 
* gnu/packages/rust-apps.scm (procs)[arguments]: Add a phase to generate
and install the shell completions.
[native-inputs]: When cross-compiling add a copy of this package.

Change-Id: I7ac96dbed91b13ced7ca5d06e8456dd8cdf1b3b4
This commit is contained in:
Efraim Flashner 2024-12-09 18:06:05 +02:00
parent 5e62a6eb8c
commit a558cf6c0d
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 39 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

41
gnu/packages/rust-apps.scm
View file

@ -2542,8 +2542,45 @@ (define-public procs
"--doctype=manpage"
"--format=manpage"
"man/procs.1.adoc"
(string-append "--destination-dir=" man))))))))
(native-inputs (list asciidoc))
(string-append "--destination-dir=" man)))))
(add-after 'install 'install-shell-completions
(lambda* (#:key native-inputs 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"))
(procs (if #$(%current-target-system)
(search-input-file native-inputs "/bin/procs")
(string-append out "/bin/procs"))))
(for-each mkdir-p
(list bash-completions-dir
zsh-completions-dir
fish-completions-dir
elvish-completions-dir))
(with-output-to-file
(string-append bash-completions-dir "/procs")
(lambda _ (invoke procs "--gen-completion-out" "bash")))
(with-output-to-file
(string-append zsh-completions-dir "/_procs")
(lambda _ (invoke procs "--gen-completion-out" "zsh")))
(with-output-to-file
(string-append fish-completions-dir "/procs.fish")
(lambda _ (invoke procs "--gen-completion-out" "fish")))
(with-output-to-file
(string-append elvish-completions-dir "/procs")
(lambda _ (invoke procs "--gen-completion-out" "elvish")))))))))
(native-inputs
(append
(if (%current-target-system)
(list this-package)
'())
(list asciidoc)))
(home-page "https://github.com/dalance/procs")
(synopsis "Modern replacement for @command{ps}")
(description "This package provides a modern replacement for @command{ps}