TakeV/guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

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

Browse source 
* guix/build/utils.scm (set-path-environment-variable): Print ENV-VAR
  and its value.
This commit is contained in:
Ludovic Courtès 2012-09-06 22:57:46 +02:00
parent 5f805fdf17
commit 9d9ef458e8
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
guix/build/utils.scm
View file

@ -98,10 +98,11 @@ (define* (set-path-environment-variable env-var sub-directories input-dirs
'(\"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)))
;;;