style: improve readability of GUILE_LOAD_PATH definition by using the format function

pull/1/head
anemofilia 2023-09-05 15:58:21 -03:00
parent 0c53c1f5c7
commit c1c6b27c42
No known key found for this signature in database
GPG Key ID: 5A8F3D62C87A2B33
1 changed files with 5 additions and 7 deletions

View File

@ -7,7 +7,6 @@
#|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-)
@ -277,12 +276,11 @@
#|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" . ,((flip string-join) ":" ("GUILE_LOAD_PATH" . ,(format #f "~a~@{:~a/share/guile/site/3.0~}"
(cons "$HOME/area/code/scm/radix/modules" "$HOME/area/code/scm/radix/modules"
(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")