scripts: describe: Add branch information to json output.
* guix/scripts/describe.scm (channel->json): Add branch information. Signed-off-by: Ludovic Courtès <ludo@gnu.org>master
parent
6d1177b2c8
commit
f1354e7926
|
@ -3,6 +3,7 @@
|
|||
;;; Copyright © 2018 Oleg Pykhalov <go.wigust@gmail.com>
|
||||
;;; Copyright © 2020 Ekaitz Zarraga <ekaitz@elenq.tech>
|
||||
;;; Copyright © 2021 Simon Tournier <zimon.toutoune@gmail.com>
|
||||
;;; Copyright © 2022 jgart <jgart@dismail.de>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -119,6 +120,7 @@ Display information about the channels currently in use.\n"))
|
|||
(let ((intro (channel-introduction channel)))
|
||||
`((name . ,(channel-name channel))
|
||||
(url . ,(channel-url channel))
|
||||
(branch . ,(channel-branch channel))
|
||||
(commit . ,(channel-commit channel))
|
||||
,@(if intro
|
||||
`((introduction
|
||||
|
|
Reference in New Issue