~ chicken-core (chicken-5) 7d2491a5f4886f92c7bca4cbec73192d49ec6ccd

commit 7d2491a5f4886f92c7bca4cbec73192d49ec6ccd
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Tue Jul 12 14:40:28 2011 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Tue Jul 12 14:40:28 2011 +0200

    setup-download: handle nonexistent version in response comment

diff --git a/setup-download.scm b/setup-download.scm
index 2b6fbd93..45e69a41 100644
--- a/setup-download.scm
+++ b/setup-download.scm
@@ -340,7 +340,8 @@
 		((irregex-match " *#\\|[- ]*([^ ]+) *\\|#.*" ln) =>
 		 (lambda (m)
 		   (let ((v (irregex-match-substring m 1)))
-		     (cond ((and version (not (string=? v version)))
+		     (cond ((string=? "#f" v))
+			   ((and version (not (string=? v version)))
 			    (warning "files-versions are not identical" ln version)
 			    (set! version #f))
 			   (else