summaryrefslogtreecommitdiff
path: root/gnu/home
diff options
context:
space:
mode:
authorAndrew Tropin <andrew@trop.in>2023-01-09 11:46:57 +0400
committerAndrew Tropin <andrew@trop.in>2023-01-09 12:03:32 +0400
commit2acce55a00df9344d73101bb57a3961ba86105b0 (patch)
tree1c0444128e4ad1e0e42fd5fef733d93c57516bc4 /gnu/home
parentd0044216c94b984bdb36a6b912fa5b34a6e6b07c (diff)
home: environment-variables: Return support for file-likes and gexps.
* gnu/home/services.scm (environment-variable-shell-definitions): Add support for file-likes and gexps. * tests/guix-home.sh: Add SHELL environment variable and test its value. Add BUILDHOSTTIME environment variable.
Diffstat (limited to 'gnu/home')
-rw-r--r--gnu/home/services.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/gnu/home/services.scm b/gnu/home/services.scm
index b003c3006b..c442da374c 100644
--- a/gnu/home/services.scm
+++ b/gnu/home/services.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2021 Andrew Tropin <andrew@trop.in>
+;;; Copyright © 2021-2023 Andrew Tropin <andrew@trop.in>
;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
;;; Copyright © 2022-2023 Ludovic Courtès <ludo@gnu.org>
;;;
@@ -212,7 +212,9 @@ ensures variable values are properly quoted."
"")
((key . #t)
#~(string-append "export " #$key "\n"))
- ((key . (? string? value))
+ ((key . (or (? string? value)
+ (? file-like? value)
+ (? gexp? value)))
#~(string-append "export " #$key "="
(shell-double-quote #$value)
"\n"))