substitute: Make progress message shorter.

* guix/scripts/substitute.scm (fetch-narinfos)[update-progress!]:
Shorten progress message so it fits on 80 columns.
This commit is contained in:
Ludovic Courtès 2018-06-12 10:30:30 +02:00
parent 4c97a368a6
commit 2bf9351e31
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -616,7 +616,7 @@ (define update-progress!
(display "\r\x1b[K" (current-error-port)) ;erase current line
(force-output (current-error-port))
(format (current-error-port)
(G_ "updating list of substitutes from '~a'... ~5,1f%")
(G_ "updating substitutes from '~a'... ~5,1f%")
url (* 100. (/ done total)))
(set! done (+ 1 done)))))