summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2018-08-31 17:26:19 +0200
committerLudovic Courtès <ludo@gnu.org>2018-08-31 17:26:56 +0200
commit301aa9e76c76026628e2abc88104410e0150b409 (patch)
treebdceb2cda3c03111aee28e45be0697759d15d745
parent8e1395be5c7d1a6e895fb5b1e70bebc0fef161a6 (diff)
downloadguix-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.scm4
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