home-services: shells: Allow list values on home-fish-configuration-environment-variables alist

radix/home/services/shells.scm

@@ -61,6 +61,9 @@
              (default #\%))
   (expansion abbreviation-expansion)) ; string | <fish-function>
 
+(define strings?
+  (list-of string?))
+
 (define fish-abbreviations?
   (list-of abbreviation?))
 
@@ -102,7 +105,9 @@
                ((key . #t)
                 #~(string-append "set -x " #$key "\n"))
                ((key . value)
-                #~(string-append "set -x " #$key " "  #$value "\n")))
+                #~(string-append "set -x " #$key " "  #$(if (strings? value)
+                                                          (string-join value)
+                                                          value)  "\n")))
              val)))
 
 (define serialize-fish-plugins