substitute-binary: Be slightly less verbose when downloading.

* guix/scripts/substitute-binary.scm (guix-substitute-binary)<"--substitute">:
  Be slightly less verbose.
This commit is contained in:
Ludovic Courtès 2014-11-13 22:17:44 +01:00
parent cd2512bfa3
commit d09e8c7b15
1 changed files with 2 additions and 2 deletions

View File

@ -731,8 +731,8 @@ substituter disabled~%")
;; Tell the daemon what the expected hash of the Nar itself is.
(format #t "~a~%" (narinfo-hash narinfo))
(format (current-error-port) "downloading `~a' from `~a'~:[~*~; (~,1f MiB installed)~]...~%"
store-path (uri->string uri)
(format (current-error-port) "downloading `~a'~:[~*~; (~,1f MiB installed)~]...~%"
store-path
;; Use the Nar size as an estimate of the installed size.
(narinfo-size narinfo)