me/guix
Archived
1
0
Fork 0
Code Activity

scripts: environment: Improve error messages.

Browse source 
* 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
1 changed files with 19 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
guix/scripts/environment.scm
View file

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