diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-03-08 10:41:34 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2017-03-08 23:42:52 +0100 |
| commit | 6aa9d63c92bd0c33dd331d2a9d224cfef1b78331 (patch) | |
| tree | f59782606a649b147bc2ecbb40c38f3b3a9a5ea8 /guix/scripts/archive.scm | |
| parent | 6f5d28f9d05aaa9743b3aac6bceb2c6323122d2d (diff) | |
| download | guix-patches-6aa9d63c92bd0c33dd331d2a9d224cfef1b78331.tar guix-patches-6aa9d63c92bd0c33dd331d2a9d224cfef1b78331.tar.gz | |
guix archive: Allow compilation with Guile 2.2.
* guix/scripts/archive.scm (export-from-store): Avoid shadowing the
top-level '_'.
Diffstat (limited to 'guix/scripts/archive.scm')
| -rw-r--r-- | guix/scripts/archive.scm | 2 |
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 |