[bug#64931] [PATCH v2] guix: pull: Also print the name of the branch.

[Attila Lendvai]

* guix/channels.scm (latest-channel-instances): Also print the branch name.
---

v2: added conditional formatting to only print the branch name when it's
specified.

 guix/channels.scm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/guix/channels.scm b/guix/channels.scm
index 681adafc6c..5b48d206c4 100644
--- a/guix/channels.scm
+++ b/guix/channels.scm
@@ -537,9 +537,15 @@ (define* (latest-channel-instances store channels
                    (values previous-channels instances)
                    (begin
                      (format (current-error-port)
-                             (G_ "Updating channel '~a' from Git repository at 
'~a'...~%")
+                             (G_ "Updating channel '~a' from Git repository at 
\
+'~a'~:[~;, branch '~a'~]...~%")
                              (channel-name channel)
-                             (channel-url channel))
+                             (channel-url channel)
+                             ;; Only conditionally print the branch name.  If
+                             ;; --commit is provided for channel-list in (guix
+                             ;; scripts pull), then the branch is set to #f.
+                             (channel-branch channel)
+                             (channel-branch channel))
                      (let* ((current (current-commit (channel-name channel)))
                             (instance
                              (latest-channel-instance store channel

base-commit: e43cbeafd1b632f39b08b3644af5230d5350a656
-- 
2.41.0