summaryrefslogtreecommitdiff
path: root/guix/ui.scm
diff options
context:
space:
mode:
authorzimoun <zimon.toutoune@gmail.com>2020-02-17 14:16:53 +0100
committerPierre Neidhardt <mail@ambrevar.xyz>2020-02-24 11:01:52 +0100
commitd7545a6b538813e88195d084f75a3e87065c999e (patch)
treeae0d9982e2a1f0132ec6935b6ae404b8c731c606 /guix/ui.scm
parent0aa0e1f8f49263975095fa9b485f48d17ae0914d (diff)
ui: Only display link in capable terminals.
* guix/ui.scm (display-generation): Display generation path on new line. * guix/scripts/describe.scm (channel-commit-hyperlink): Add TRANSFORMER argument. (display-profile-content): Use TRANSFORMER argument to display URL explicitly when terminal does not support hyperlinks.
Diffstat (limited to 'guix/ui.scm')
-rw-r--r--guix/ui.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/ui.scm b/guix/ui.scm
index db932ecacb..371af4e047 100644
--- a/guix/ui.scm
+++ b/guix/ui.scm
@@ -1637,7 +1637,7 @@ DURATION-RELATION with the current time."
(let* ((file (generation-file-name profile number))
(link (if (supports-hyperlinks?)
(cut file-hyperlink file <>)
- identity))
+ (cut format #f (G_ "~a~%file: ~a") <> file)))
(header (format #f (link (highlight (G_ "Generation ~a\t~a")))
number
(date->string