summaryrefslogtreecommitdiff
path: root/guix/scripts/import.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-05-17 13:36:44 +0200
committerLudovic Courtès <ludo@gnu.org>2016-05-17 14:02:48 +0200
commit787afdd0f1ce1d4aa7500d858f2635462b444699 (patch)
tree6245d72a17f4a4396aa978dfe2a32c51b2215aae /guix/scripts/import.scm
parentf99f3f24ef604f44023379da4b375c80e6844be1 (diff)
downloadgnu-guix-787afdd0f1ce1d4aa7500d858f2635462b444699.tar
gnu-guix-787afdd0f1ce1d4aa7500d858f2635462b444699.tar.gz
import: Exit with non-zero when an unknown importer is asked.
* guix/scripts/import.scm (guix-import): Use 'leave' instead of 'format' when IMPORTER is unknown.
Diffstat (limited to 'guix/scripts/import.scm')
-rw-r--r--guix/scripts/import.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/guix/scripts/import.scm b/guix/scripts/import.scm
index 7b29794e8f..cf8fc073b2 100644
--- a/guix/scripts/import.scm
+++ b/guix/scripts/import.scm
@@ -109,5 +109,4 @@ Run IMPORTER with ARGS.\n"))
(if (member importer importers)
(let ((expr (apply (resolve-importer importer) args)))
(pretty-print expr (newline-rewriting-port (current-output-port))))
- (format (current-error-port)
- (_ "guix import: invalid importer~%"))))))
+ (leave (_ "~a: invalid importer~%") importer)))))