diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-08-31 17:26:19 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-08-31 17:26:56 +0200 |
| commit | 301aa9e76c76026628e2abc88104410e0150b409 (patch) | |
| tree | bdceb2cda3c03111aee28e45be0697759d15d745 | |
| parent | 8e1395be5c7d1a6e895fb5b1e70bebc0fef161a6 (diff) | |
| download | patches-301aa9e76c76026628e2abc88104410e0150b409.tar patches-301aa9e76c76026628e2abc88104410e0150b409.tar.gz | |
pack: Correctly report "unknown pack format" errors.
* guix/scripts/pack.scm (guix-pack): Fix "unknown pack format" error
message.
| -rw-r--r-- | guix/scripts/pack.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/scripts/pack.scm b/guix/scripts/pack.scm index 729850839b..fb0677de28 100644 --- a/guix/scripts/pack.scm +++ b/guix/scripts/pack.scm @@ -748,8 +748,8 @@ Create a bundle of PACKAGE.\n")) (build-image (match (assq-ref %formats pack-format) ((? procedure? proc) proc) (#f - (leave (G_ "~a: unknown pack format") - format)))) + (leave (G_ "~a: unknown pack format~%") + pack-format)))) (localstatedir? (assoc-ref opts 'localstatedir?))) (run-with-store store (mlet* %store-monad ((profile (profile-derivation |