diff options
| -rw-r--r-- | guix/scripts/challenge.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/scripts/challenge.scm b/guix/scripts/challenge.scm index 07477f816e..69c2781abb 100644 --- a/guix/scripts/challenge.scm +++ b/guix/scripts/challenge.scm @@ -257,7 +257,8 @@ NARINFO." (http-fetch uri))) (define reporter (progress-reporter/file (narinfo-path narinfo) - (max size (or actual-size 0)) ;defensive + (and size + (max size (or actual-size 0))) ;defensive #:abbreviation (const (uri-host uri)))) (define result |