summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--guix/scripts/archive.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/scripts/archive.scm b/guix/scripts/archive.scm
index 9e49c53635..cad279fb50 100644
--- a/guix/scripts/archive.scm
+++ b/guix/scripts/archive.scm
@@ -268,7 +268,7 @@ resulting archive to the standard output port."
               (let ((system (assoc-ref opts 'system)))
                 (format #t "~a\n"
                         (build-docker-image file #:system system))))
-             (_
+             (x
               ;; TODO: Remove this restriction.
               (leave (_ "only a single item can be exported to Docker~%")))))
           (format