scripts: challenge: Fix regression.
This is a follow-up of 3cde5231aa
that fixes the
challenge test.
When dealing with uncompressed NAR, the file size is false. Propagate it to
progress-reporter/file as it used to be the case.
* guix/scripts/challenge.scm (call-with-nar): Accept false size.
master
parent
7d3ad4c256
commit
0471024acc
|
@ -257,7 +257,8 @@ NARINFO."
|
||||||
(http-fetch uri)))
|
(http-fetch uri)))
|
||||||
(define reporter
|
(define reporter
|
||||||
(progress-reporter/file (narinfo-path narinfo)
|
(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))))
|
#:abbreviation (const (uri-host uri))))
|
||||||
|
|
||||||
(define result
|
(define result
|
||||||
|
|
Reference in New Issue