pull, describe: Emit hyperlinks for commit identifiers.
authorLudovic Courtès <ludo@gnu.org>
Thu, 28 Nov 2019 13:22:16 +0000 (14:22 +0100)
committerLudovic Courtès <ludo@gnu.org>
Thu, 28 Nov 2019 17:43:54 +0000 (18:43 +0100)
commit2d6bd5edbc82fe21c794d70db5374f716995f3a2
tree1746f1baf8d7d5513d1086efd2fdc0aa551b4bdd
parent77e7158c1bae3f2f13ff9048d1b29ad90b2c39a5
pull, describe: Emit hyperlinks for commit identifiers.

* guix/scripts/pull.scm (%vcs-web-views): New variable.
(channel-commit-hyperlink): New procedure.
(display-news-entry): Add 'channel' parameter.  When
'supports-hyperlinks?' returns true, call 'channel-commit-hyperlink'.
(display-profile-content): Likewise, and define CHANNEL.
(display-channel-specific-news): Pass CHANNEL to 'display-news-entry'.
* guix/ui.scm (hyperlink): Make public.
guix/scripts/pull.scm
guix/ui.scm