From 50f4ea18c46ea6e702dbd20841401662ba925f76 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Wed, 5 Apr 2017 22:50:21 +0200 Subject: environment: Deal with single-entry search paths. This is a followup to fcd75bdbfa99d14363b905afbf914eec20e69df8. * guix/scripts/environment.scm (create-environment): Check whether SEPARATOR is #f. --- guix/scripts/environment.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'guix/scripts') diff --git a/guix/scripts/environment.scm b/guix/scripts/environment.scm index 44f490043c..5a6abd00fb 100644 --- a/guix/scripts/environment.scm +++ b/guix/scripts/environment.scm @@ -79,7 +79,9 @@ (define (create-environment profile paths pure?) (let ((current (getenv variable))) (setenv variable (if (and current (not pure?)) - (string-append value separator current) + (if separator + (string-append value separator current) + value) value))))) (evaluate-profile-search-paths profile paths)) -- cgit v1.2.3