diff options
author | Andrew Tropin <andrew@trop.in> | 2023-01-09 11:46:57 +0400 |
---|---|---|
committer | Andrew Tropin <andrew@trop.in> | 2023-01-09 12:03:32 +0400 |
commit | 2acce55a00df9344d73101bb57a3961ba86105b0 (patch) | |
tree | 1c0444128e4ad1e0e42fd5fef733d93c57516bc4 /gnu/home | |
parent | d0044216c94b984bdb36a6b912fa5b34a6e6b07c (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.scm | 6 |
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")) |