diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-05-17 13:36:44 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2016-05-17 14:02:48 +0200 |
| commit | 787afdd0f1ce1d4aa7500d858f2635462b444699 (patch) | |
| tree | 6245d72a17f4a4396aa978dfe2a32c51b2215aae | |
| parent | f99f3f24ef604f44023379da4b375c80e6844be1 (diff) | |
| download | 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.
| -rw-r--r-- | guix/scripts/import.scm | 3 |
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))))) |