diff options
author | Efraim Flashner <efraim@flashner.co.il> | 2017-02-20 12:56:14 +0200 |
---|---|---|
committer | Efraim Flashner <efraim@flashner.co.il> | 2017-02-20 12:56:14 +0200 |
commit | d15432ca9e9359b865aac63ae47863e94bbce0e4 (patch) | |
tree | be4e6f52cb8e31f5b5fad637c95c0a730ea76081 /guix/scripts | |
parent | def971689052ebc3e0a68684328c28cac35b8596 (diff) | |
parent | 3b254d76132627ff62ac5571f4175669164624c5 (diff) | |
download | guix-patches-d15432ca9e9359b865aac63ae47863e94bbce0e4.tar guix-patches-d15432ca9e9359b865aac63ae47863e94bbce0e4.tar.gz |
Merge remote-tracking branch 'origin/master' into core-updates
Diffstat (limited to 'guix/scripts')
-rw-r--r-- | guix/scripts/import/stackage.scm | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/guix/scripts/import/stackage.scm b/guix/scripts/import/stackage.scm index cf47bff259..f91b496d24 100644 --- a/guix/scripts/import/stackage.scm +++ b/guix/scripts/import/stackage.scm @@ -98,15 +98,16 @@ Import and convert the LTS Stackage package for PACKAGE-NAME.\n")) (reverse opts)))) (match args ((package-name) - (let ((sexp (stackage->guix-package - package-name - #:include-test-dependencies? - (assoc-ref opts 'include-test-dependencies?) - #:lts-version (assoc-ref opts 'lts-version)))) - (unless sexp - (leave (_ "failed to download cabal file for package '~a'~%") - package-name)) - sexp)) + (with-error-handling + (let ((sexp (stackage->guix-package + package-name + #:include-test-dependencies? + (assoc-ref opts 'include-test-dependencies?) + #:lts-version (assoc-ref opts 'lts-version)))) + (unless sexp + (leave (_ "failed to download cabal file for package '~a'~%") + package-name)) + sexp))) (() (leave (_ "too few arguments~%"))) ((many ...) |