~ruther/guix-local

71ae18ee52757eb60be50bb2e50bab5e84d0f097 — Ludovic Courtès 10 years ago bbee7bd
guix download: Gracefully handle missing arguments.

Fixes <http://bugs.gnu.org/21991>.
Reported by Jan Synáček <jan.synacek@gmail.com>.

* guix/scripts/download.scm (guix-download): Call 'leave' when OPTS does
not contain an 'argument' key.
1 files changed, 3 insertions(+), 2 deletions(-)

M guix/scripts/download.scm
M guix/scripts/download.scm => guix/scripts/download.scm +3 -2
@@ 1,5 1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2012, 2013, 2015 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;


@@ 102,7 102,8 @@ Supported formats: 'nix-base32' (default), 'base32', and 'base16'
  (with-error-handling
    (let* ((opts  (parse-options))
           (store (open-connection))
           (arg   (assq-ref opts 'argument))
           (arg   (or (assq-ref opts 'argument)
                      (leave (_ "no download URI was specified~%"))))
           (uri   (or (string->uri arg)
                      (leave (_ "~a: failed to parse URI~%")
                             arg)))