scripts: environment: Improve error messages.

* guix/scripts/environment.scm (guix-environment): Wrap procedure body with error handling form.
2015-03-16 08:59:59 -04:00 · 2015-03-16 08:59:59 -04:00 · 5762f3062c
commit 5762f3062c
parent 2f094a69f0
1 changed files with 19 additions and 18 deletions
--- a/guix/scripts/environment.scm
+++ b/guix/scripts/environment.scm
@ -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)))))))