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

style: improve readability of GUILE_LOAD_PATH definition by using the flip combinator

pull/1/head
anemofilia 2023-08-27 19:17:46 -03:00
parent 2b8f36bfa9
commit d7558c5166
No known key found for this signature in database
GPG Key ID: 5A8F3D62C87A2B33
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
radio.scm
View File

@ -7,6 +7,7 @@
#|Radix|# (radix packages fonts) #|Radix|# (radix packages fonts)
(radix packages wm) (radix packages wm)
(radix home services) (radix home services)
(radix combinators)
(radix utils) (radix utils)
((radix files awesome) #:prefix file:awesome-) ((radix files awesome) #:prefix file:awesome-)
((radix files emacs) #:prefix file:emacs-) ((radix files emacs) #:prefix file:emacs-)
@ -310,13 +311,12 @@
#|Guile|# #|Guile|#
("GUILE_WARN_DEPRECATED" . "detailed") ("GUILE_WARN_DEPRECATED" . "detailed")
("GUILE_HISTORY" . "$XDG_CACHE_HOME/guile/history") ("GUILE_HISTORY" . "$XDG_CACHE_HOME/guile/history")
("GUILE_LOAD_PATH" . ,(string-join ("GUILE_LOAD_PATH" . ,((flip string-join) ":"
(cons "$HOME/projects/guile/radix/modules" (cons "$HOME/projects/guile/radix/modules"
(map (cut string-append <> "/share/guile/site/3.0") (map (cut string-append <> "/share/guile/site/3.0")
'("/run/current-system/profile" '("/run/current-system/profile"
"$XDG_CONFIG_HOME/guix/current" "$XDG_CONFIG_HOME/guix/current"
"$HOME/.guix-home/profile"))) "$HOME/.guix-home/profile")))))
":"))
#|GUIX|# #|GUIX|#
("GUIX_PROFILE" . "$XDG_CONFIG_HOME/guix/current") ("GUIX_PROFILE" . "$XDG_CONFIG_HOME/guix/current")