me
/
guix
Archived
1
0
Fork 0

utils: Make `set-path-environment-variable' verbose.

* guix/build/utils.scm (set-path-environment-variable): Print ENV-VAR
  and its value.
master
Ludovic Courtès 2012-09-06 22:57:46 +02:00
parent 5f805fdf17
commit 9d9ef458e8
1 changed files with 5 additions and 4 deletions

View File

@ -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)))
;;;