Allow double-click select of URL in status
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>
This commit is contained in:
parent
55d4526411
commit
9f1b787120
@ -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)
|
||||
|
Loading…
Reference in New Issue
Block a user