Revert "Allow double-click select of URL in status"
As discussed on #guix, this should wait until 1.1.0 is branched off to avoid
having to update translations.
This reverts commit 9f1b787120
.
This commit is contained in:
parent
9f1b787120
commit
1c86577d62
1 changed files with 5 additions and 5 deletions
|
@ -472,16 +472,16 @@ (define erase-current-line*
|
|||
(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 @@ (define erase-current-line*
|
|||
(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 a new issue