~ chicken-core (chicken-5) 677e1a526bc6d1ddc3e97da968ab6bc95b9a6ed3

commit 677e1a526bc6d1ddc3e97da968ab6bc95b9a6ed3
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Feb 17 09:30:10 2011 -0500
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Feb 17 09:30:10 2011 -0500

    changed comment about gather-egg-information (thanks to mario for clearing that up)

diff --git a/setup-download.scm b/setup-download.scm
index 39f99f45..91ae67dd 100644
--- a/setup-download.scm
+++ b/setup-download.scm
@@ -127,8 +127,7 @@
 		    sos)))
 	       (values src ver))))))
 
-;;XXX is this used anywhere?
-  (define (gather-egg-information dir)
+  (define (gather-egg-information dir)	; used by salmonella
     (let ((ls (directory dir)))
       (filter-map
        (lambda (egg)