summaryrefslogtreecommitdiff
path: root/guix/ui.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-11-28 14:22:16 +0100
committerLudovic Courtès <ludo@gnu.org>2019-11-28 18:43:54 +0100
commit2d6bd5edbc82fe21c794d70db5374f716995f3a2 (patch)
tree1746f1baf8d7d5513d1086efd2fdc0aa551b4bdd /guix/ui.scm
parent77e7158c1bae3f2f13ff9048d1b29ad90b2c39a5 (diff)
downloadguix-2d6bd5edbc82fe21c794d70db5374f716995f3a2.tar.gz
guix-2d6bd5edbc82fe21c794d70db5374f716995f3a2.tar.xz
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.
Diffstat (limited to 'guix/ui.scm')
-rw-r--r--guix/ui.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/guix/ui.scm b/guix/ui.scm
index e31db33d3b..b7d5516b5a 100644
--- a/guix/ui.scm
+++ b/guix/ui.scm
@@ -111,6 +111,7 @@
package-specification->name+version+output
supports-hyperlinks?
+ hyperlink
file-hyperlink
location->hyperlink