diff options
| -rw-r--r-- | guix/build/utils.scm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/guix/build/utils.scm b/guix/build/utils.scm index 6005813f77..148f62ec51 100644 --- a/guix/build/utils.scm +++ b/guix/build/utils.scm @@ -98,10 +98,11 @@ SEPARATOR-separated path accordingly. Example: '(\"lib/pkgconfig\") (list package1 package2)) " - (setenv env-var - (list->search-path-as-string (search-path-as-list sub-directories - input-dirs) - separator))) + (let* ((path (search-path-as-list sub-directories input-dirs)) + (value (list->search-path-as-string path separator))) + (setenv env-var value) + (format #t "environment variable `~a' set to `~a'~%" + env-var value))) ;;; |