mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
scripts: describe: Support 'channels-sans-intro' format for local checkouts.
* guix/scripts/describe.scm (%display-checkout-info): Support 'channels-sans-intro' format. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
6cca8f0694
commit
f8e0e5274f
1 changed files with 2 additions and 0 deletions
|
@ -168,6 +168,8 @@ (define (display-checkout-info fmt)
|
|||
(format #t (G_ " commit: ~a~%") (channel-commit channel)))
|
||||
('channels
|
||||
(pretty-print `(list ,(channel->code channel))))
|
||||
('channels-sans-intro
|
||||
(pretty-print `(list ,(channel->code channel #:include-introduction? #f))))
|
||||
('json
|
||||
(display (channel->json channel))
|
||||
(newline))
|
||||
|
|
Loading…
Reference in a new issue