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

home-environments: radio: Declare fish-autopair, fish-bang-bang and fish-functional plugins

impermanence
Luis Guilherme Coelho 2024-07-05 14:47:15 -03:00
parent e8144c9f9e
commit bbe7086d3e
No known key found for this signature in database
GPG Key ID: 1F2E76ACE3F531C8
1 changed files with 8 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
home-environments/radio.scm
View File

@ -18,6 +18,7 @@
#:use-module (gnu packages curl)
#|D|# #:use-module (gnu packages databases)
#|F|# #:use-module (gnu packages file)
#|F|# #:use-module (gnu packages file-systems)
#:use-module (gnu packages fonts)
#:use-module (gnu packages freedesktop)
#|G|# #:use-module (gnu packages glib)
@ -81,7 +82,8 @@
#|B|# #:use-module (radix packages browser-extensions)
#|D|# #:use-module (radix packages disk)
#|I|# #:use-module (radix packages image-viewers)
#|F|# #:use-module (radix packages freedesktop)
#|F|# #:use-module (radix packages fish-xyz)
#:use-module (radix packages freedesktop)
#:use-module (radix packages fonts)
#|P|# #:use-module (radix packages pdf)
#|S|# #:use-module (radix packages seninha)
@ -178,6 +180,7 @@
(define packages:file-managing
(list #|disk |# lf
#|file |# file
#|file-systems |# tmsu
#|haskell-xyz |# pandoc
#|image-viewers|# chafa
#|pdf |# poppler
@ -368,6 +371,10 @@
#|Kakoune aliases for the shell|#
(":e" . "kak")
(":q" . "exit")))
(plugins
(list fish-autopair
fish-bang-bang
fish-functional))
(abbreviations
(let ((@ (symbol-prefix-proc '@))
(edit (partial format #f "$EDITOR~@{ ~a~}"))
@ -424,26 +431,6 @@
(u . "curl -F file=@% https://0x0.st | wl-copy")
(v . "yt-dlp '%'")))
#|Shell history|#
,(abbreviation
(name "!!")
(pattern "[^\\']*!!.*")
(position 'anywhere)
(expansion
(fish-function "bang-bang")))
,(abbreviation
(name "!$")
(pattern "[^\\']*!\\$.*")
(position 'anywhere)
(expansion
(fish-function "bang-dollar")))
,(abbreviation
(name "!*")
(pattern "[^\\']*!\\*.*")
(position 'anywhere)
(expansion
(fish-function "bang-star")))
,@(map (match-lambda
((x . y) (abbreviation
(name x)