summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTomZ <tomz@freedommail.ch>2020-04-07 21:39:04 +0200
committerMarius Bakke <mbakke@fastmail.com>2020-04-17 17:03:05 +0200
commit8fa4ac5be4d5f8a1e62635842b16486832ff49f1 (patch)
tree294ce6d41dbbb17a6f6516b2e07ffe65b0ce607e
parent974bf81776bd13f2162ebc0b2b01466509840b12 (diff)
status: Allow double-click select of URLs.
Various places while downloading or compiling guix prints the source URL. This change makes the URL easier to use by placing a space between the URL and the trailing dots. Signed-off-by: Marius Bakke <mbakke@fastmail.com>
-rw-r--r--guix/status.scm10
1 files changed, 5 insertions, 5 deletions
diff --git a/guix/status.scm b/guix/status.scm
index 4b2edc2f3c..45e441eac5 100644
--- a/guix/status.scm
+++ b/guix/status.scm
@@ -472,16 +472,16 @@ addition to build events."
(let ((count (match (assq-ref properties 'graft)
(#f 0)
(lst (or (assq-ref lst 'count) 0)))))
- (format port (info (N_ "applying ~a graft for ~a..."
- "applying ~a grafts for ~a..."
+ (format port (info (N_ "applying ~a graft for ~a ..."
+ "applying ~a grafts for ~a ..."
count))
count drv)))
('profile
(let ((count (match (assq-ref properties 'profile)
(#f 0)
(lst (or (assq-ref lst 'count) 0)))))
- (format port (info (N_ "building profile with ~a package..."
- "building profile with ~a packages..."
+ (format port (info (N_ "building profile with ~a package ..."
+ "building profile with ~a packages ..."
count))
count)))
('profile-hook
@@ -525,7 +525,7 @@ addition to build events."
(newline port)))
(('download-started item uri _ ...)
(erase-current-line*)
- (format port (info (G_ "downloading from ~a...")) uri)
+ (format port (info (G_ "downloading from ~a ...")) uri)
(newline port))
(('download-progress item uri
(= string->number size)