I've applied the following temporary workaround to my private branch, to
enable me to work on the IceCat security update.
Mark
--8<---------------cut here---------------start------------->8---
diff --git a/guix/status.scm b/guix/status.scm
index c6956066f..8c6045a7d 100644
--- a/guix/status.scm
+++ b/guix/status.scm
@@ -359,10 +359,11 @@ addition to build events."
(let ((uri (if (string-contains uri "/nar/")
(nar-uri-abbreviation uri)
(basename uri))))
- (display-download-progress uri size
- #:start-time
- (download-start download)
- #:transferred transferred))))))
+ (when transferred ; FIXME
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
+ (display-download-progress uri size
+ #:start-time
+ (download-start download)
+ #:transferred transferred)))))))
(('substituter-succeeded item _ ...)
;; If there are no jobs running, we already reported download completion
;; so there's nothing left to do.
--8<---------------cut here---------------end--------------->8---
