Fixes PR13659. There's nothing wrong with an empty zip file, so zip shouldn't error
This commit is contained in:
parent
a12d516d94
commit
5aed43de52
|
@ -262,7 +262,7 @@
|
|||
;; zip : output-file paths ->
|
||||
(provide zip)
|
||||
(define (zip zip-file . paths)
|
||||
(when (null? paths) (error 'zip "no paths specified"))
|
||||
;; (when (null? paths) (error 'zip "no paths specified"))
|
||||
(with-output-to-file zip-file
|
||||
(lambda () (zip->output (pathlist-closure paths)))))
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user