cristiancmoises
/
radix
mirror of https://codeberg.org/anemofilia/radix.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

home-services: shells: Look for files in the share/fish subdir of fish plugins outputs

main
Luis Guilherme Coelho 2024-08-02 20:42:29 -03:00
parent c8cb212ec5
commit aff21b7778
No known key found for this signature in database
GPG Key ID: 1F2E76ACE3F531C8
2 changed files with 15 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
radix/home/services/shells.scm
View File

@ -203,14 +203,14 @@ end\n\n")
(let ((almost-basename (almost-basename file))) (let ((almost-basename (almost-basename file)))
(list (string-append "fish/" almost-basename) (list (string-append "fish/" almost-basename)
(file-append plugin (file-append plugin
(string-append "/share/" (string-append "/share/fish/"
almost-basename))))) almost-basename)))))
(list-contents dir))) (list-contents dir)))
(let* ((drv (run-with-store (open-connection) (let* ((drv (run-with-store (open-connection)
(with-store %store (with-store %store
(package->derivation plugin)))) (package->derivation plugin))))
(path (string-append (derivation->output-path drv) "/share"))) (path (string-append (derivation->output-path drv) "/share/fish/")))
(append-map directory-files (append-map directory-files
(filter (negate (cut string-suffix? "doc" <>)) (filter (negate (cut string-suffix? "doc" <>))
(list-contents path))))) (list-contents path)))))

27
radix/packages/fish-xyz.scm
View File

@ -4,7 +4,6 @@
#:use-module (guix gexp) #:use-module (guix gexp)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (guix build-system copy) #:use-module (guix build-system copy)
#:use-module (guix build-system trivial)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:export (fish-plugin-union)) #:export (fish-plugin-union))
@ -24,8 +23,8 @@
"0mfx43n3ngbmyfp4a4m9a04gcgwlak6f9myx2089bhp5qkrkanmk")))) "0mfx43n3ngbmyfp4a4m9a04gcgwlak6f9myx2089bhp5qkrkanmk"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list #:install-plan #~'(("conf.d" "share/") (list #:install-plan #~'(("conf.d" "share/fish/")
("functions" "share/")))) ("functions" "share/fish/"))))
(home-page "https://github.com/jorgebucaran/autopair.fish") (home-page "https://github.com/jorgebucaran/autopair.fish")
(synopsis "Auto-complete matching pairs for the Fish shell.") (synopsis "Auto-complete matching pairs for the Fish shell.")
(description "This package aims to provide auto-complete matching pairs (description "This package aims to provide auto-complete matching pairs
@ -47,9 +46,9 @@ for the Fish shell.")
"1hqqppna8iwjnm8135qdjbd093583qd2kbq8pj507zpb1wn9ihjg")))) "1hqqppna8iwjnm8135qdjbd093583qd2kbq8pj507zpb1wn9ihjg"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list #:install-plan #~'(("completions" "share/") (list #:install-plan #~'(("completions" "share/fish/")
("conf.d" "share/") ("conf.d" "share/fish/")
("functions" "share/")))) ("functions" "share/fish/"))))
(home-page "https://github.com/PatrickF1/fzf.fish") (home-page "https://github.com/PatrickF1/fzf.fish")
(synopsis "Mnemonic key bindings for using fzf within the Fish shell.") (synopsis "Mnemonic key bindings for using fzf within the Fish shell.")
(description "This package aims to augment your Fish shell with mnemonic (description "This package aims to augment your Fish shell with mnemonic
@ -70,8 +69,8 @@ key bindings to efficiently find what you need using fzf.")
"1bf61f6h5p7mc0schwbd693cafp1vcjz2f7pzy6gn33nafsc5wx0")))) "1bf61f6h5p7mc0schwbd693cafp1vcjz2f7pzy6gn33nafsc5wx0"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list #:install-plan #~'(("conf.d" "share/") (list #:install-plan #~'(("conf.d" "share/fish/")
("functions" "share/")))) ("functions" "share/fish/"))))
(home-page "https://github.com/oh-my-fish/plugin-bang-bang") (home-page "https://github.com/oh-my-fish/plugin-bang-bang")
(synopsis "Bash style history substitution for the Fish shell.") (synopsis "Bash style history substitution for the Fish shell.")
(description "This package aims to provide Bash style history substitution (description "This package aims to provide Bash style history substitution
@ -92,8 +91,8 @@ for the Fish shell.")
"06g8pv68b0vyhhqzj469i9rcics67cq1kbhb8946azjb8f7rhy6s")))) "06g8pv68b0vyhhqzj469i9rcics67cq1kbhb8946azjb8f7rhy6s"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list #:install-plan #~'(("functions" "share/") (list #:install-plan #~'(("functions" "share/fish/")
("conf.d" "share/")))) ("conf.d" "share/fish/"))))
(home-page "https://github.com/nickeb96/puffer-fish.git") (home-page "https://github.com/nickeb96/puffer-fish.git")
(synopsis "Text Expansions for the Fish shell.") (synopsis "Text Expansions for the Fish shell.")
(description "This plugin aims to provide text expansions for the Fish (description "This plugin aims to provide text expansions for the Fish
@ -114,7 +113,7 @@ shell.")
"0vnq4kpilg0z470d7782pp8wdj57cfkfad27d6mcylwl8n7wnhrn")))) "0vnq4kpilg0z470d7782pp8wdj57cfkfad27d6mcylwl8n7wnhrn"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list #:install-plan #~'(("functions" "share/")))) (list #:install-plan #~'(("functions" "share/fish/"))))
(home-page "https://github.com/oh-my-fish/plugin-functional") (home-page "https://github.com/oh-my-fish/plugin-functional")
(synopsis "Higher order functions for the Fish shell.") (synopsis "Higher order functions for the Fish shell.")
(description "This plugin aims to provide higher order functions for the (description "This plugin aims to provide higher order functions for the
@ -135,7 +134,7 @@ Fish shell.")
"12l7m08bp8vfhl8dmi0bfpvx86i344zbg03v2bc7wfhm20li3hhc")))) "12l7m08bp8vfhl8dmi0bfpvx86i344zbg03v2bc7wfhm20li3hhc"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list #:install-plan #~'(("conf.d" "share/")))) (list #:install-plan #~'(("conf.d" "share/fish/"))))
(home-page "https://github.com/franciscolourenco/done") (home-page "https://github.com/franciscolourenco/done")
(synopsis "A fish-shell plugin to automatically receive notifications when (synopsis "A fish-shell plugin to automatically receive notifications when
long processes finish.") long processes finish.")
@ -157,8 +156,8 @@ when long processes finish.")
"0p4vk6pq858h2v39c41irrgw1fbbcs7gd9cdr9i9fd3d6i81kmri")))) "0p4vk6pq858h2v39c41irrgw1fbbcs7gd9cdr9i9fd3d6i81kmri"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list #:install-plan #~'(("conf.d" "share/") (list #:install-plan #~'(("conf.d" "share/fish/")
("functions" "share/")))) ("functions" "share/fish/"))))
(home-page "https://github.com/meaningful-ooo/sponge") (home-page "https://github.com/meaningful-ooo/sponge")
(synopsis "A fish-shell plugin to clean fish history from typos (synopsis "A fish-shell plugin to clean fish history from typos
automatically.") automatically.")