From 0b2a17de72825b9ca0d494ea8c4d9bf121689f4e Mon Sep 17 00:00:00 2001
From: TomZ <tomz@freedommail.ch>
Date: Sat, 14 Mar 2020 14:36:28 +0100
Subject: [PATCH] Allow double-click select of URL in status
Various places while downloading or compiling guix
prints the source URL. This change makes the URL be easier
to be used by placing a space between the URL and the trailing
dots.
---
guix/status.scm | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
@@ -472,8 +472,8 @@ 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-hook
@@ -484,7 +484,7 @@ addition to build events."
(format port (info (G_ "running profile hook of type '~a'..."))
hook-type))))
(_
- (format port (info (G_ "building ~a...")) drv))))
+ (format port (info (G_ "building ~a ...")) drv))))
(newline port))
(('build-succeeded drv . _)
(erase-current-line*) ;erase spinner or progress bar
@@ -517,7 +517,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)
--
2.25.1