scripts: environment: Improve error messages.

* guix/scripts/environment.scm (guix-environment): Wrap procedure body with
  error handling form.
This commit is contained in:
David Thompson 2015-03-16 08:59:59 -04:00
parent 2f094a69f0
commit 5762f3062c

View File

@ -220,6 +220,7 @@ packages."
(define (handle-argument arg result)
(alist-cons 'package arg result))
(with-error-handling
(with-store store
(let* ((opts (parse-command-line args %options (list %default-options)
#:argument-handler handle-argument))
@ -237,4 +238,4 @@ packages."
(show-search-paths inputs drvs pure?))
(else
(create-environment inputs drvs pure?)
(system command))))))
(system command)))))))