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

feat: add support to insert symbols as valid position and name entries in the abbreviation record on (radix home services shells)

pull/1/head
anemofilia 2023-09-25 00:58:04 -03:00
parent d06288ad8e
commit ecd5d2c56f
No known key found for this signature in database
GPG Key ID: 5A8F3D62C87A2B33
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
modules/radix/home/services/shells.scm
View File

@ -47,10 +47,10 @@
(define-record-type* <abbreviation> (define-record-type* <abbreviation>
abbreviation make-abbreviation abbreviation make-abbreviation
abbreviation? abbreviation?
(name abbreviation-name) ; string (name abbreviation-name) ; string | symbol
(pattern abbreviation-pattern ; string | #f (pattern abbreviation-pattern ; string | #f
(default #f)) (default #f))
(position abbreviation-position ; "command" | "anywhere" | #f (position abbreviation-position ; 'command | 'anywhere | #f
(default #f)) ; defaults to "command" -´ (default #f)) ; defaults to "command" -´
(marker abbreviation-marker ; char (marker abbreviation-marker ; char
(default #\%)) (default #\%))
@ -70,8 +70,8 @@
~@[--regex ~a ~]~ ~@[--regex ~a ~]~
--set-cursor=~a ~ --set-cursor=~a ~
~a~%" ~a~%"
#$name '#$name
#$position '#$position
#$pattern #$pattern
#$marker #$marker
#$(if (fish-function? expansion) #$(if (fish-function? expansion)