01/02: describe: Fix 'format' option.

[guix-commits]

wigust pushed a commit to branch master
in repository guix.

commit 3dd28aa37cc3f3a6bbb5f7f8d9fb49cc457b0c10
Author: Oleg Pykhalov <address@hidden>
Date:   Wed Nov 21 01:19:54 2018 +0300

    describe: Fix 'format' option.
    
    Fix ‘guix describe’ ignores ‘--format=FORMAT’ option.
    
    * guix/scripts/describe.scm (%options): Fix 'format' option.
---
 guix/scripts/describe.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/scripts/describe.scm b/guix/scripts/describe.scm
index e595020..d3203e9 100644
--- a/guix/scripts/describe.scm
+++ b/guix/scripts/describe.scm
@@ -40,7 +40,7 @@
                 (lambda (opt name arg result)
                   (unless (member arg '("human" "channels"))
                     (leave (G_ "~a: unsupported output format~%") arg))
-                  (alist-cons 'format 'channels result)))
+                  (alist-cons 'format (string->symbol arg) result)))
         (option '(#\h "help") #f #f
                 (lambda args
                   (show-help)