guix archive: Allow compilation with Guile 2.2.

* guix/scripts/archive.scm (export-from-store): Avoid shadowing the
top-level '_'.
This commit is contained in:
Ludovic Courtès 2017-03-08 10:41:34 +01:00
parent 6f5d28f9d0
commit 6aa9d63c92
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 1 additions and 1 deletions

View File

@ -268,7 +268,7 @@ resulting archive to the standard output port."
(let ((system (assoc-ref opts 'system))) (let ((system (assoc-ref opts 'system)))
(format #t "~a\n" (format #t "~a\n"
(build-docker-image file #:system system)))) (build-docker-image file #:system system))))
(_ (x
;; TODO: Remove this restriction. ;; TODO: Remove this restriction.
(leave (_ "only a single item can be exported to Docker~%"))))) (leave (_ "only a single item can be exported to Docker~%")))))
(format (format