Browse Source

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

* guix/build/utils.scm (set-path-environment-variable): Print ENV-VAR
  and its value.
wip-grafts
Ludovic Courtès 10 years ago
parent
commit
9d9ef458e8
  1. 9
      guix/build/utils.scm

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

Loading…
Cancel
Save