diff options
| author | Marius Bakke <marius@gnu.org> | 2021-05-22 17:21:57 +0200 |
|---|---|---|
| committer | Marius Bakke <marius@gnu.org> | 2021-05-22 17:21:57 +0200 |
| commit | 4ea6852c5ff1606cf6848f3ddbb669120b228c13 (patch) | |
| tree | 6f21e3cad7a3cad4eb847f404b6ba6450dfc2bef /guix/scripts/challenge.scm | |
| parent | fcf45f8d756b92c5a99308d671af8992b489c4b4 (diff) | |
| parent | d4ffa9630277fa8699c783c08381d688626d4bc3 (diff) | |
| download | guix-patches-4ea6852c5ff1606cf6848f3ddbb669120b228c13.tar guix-patches-4ea6852c5ff1606cf6848f3ddbb669120b228c13.tar.gz | |
Merge branch 'master' into core-updates
Diffstat (limited to 'guix/scripts/challenge.scm')
| -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 |