diff --git a/home-environments/radio.scm b/home-environments/radio.scm index 0ad2a2e..5da8da8 100644 --- a/home-environments/radio.scm +++ b/home-environments/radio.scm @@ -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)