From 5aed43de524a083786dcb902d2a35021392c1da3 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Mon, 29 Apr 2013 15:00:53 -0600 Subject: [PATCH] Fixes PR13659. There's nothing wrong with an empty zip file, so zip shouldn't error --- collects/file/zip.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/file/zip.rkt b/collects/file/zip.rkt index e67c2dbf3e..03c2b5fe2d 100644 --- a/collects/file/zip.rkt +++ b/collects/file/zip.rkt @@ -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)))))