~ chicken-core (chicken-5) 459f24b53a875bb7fe409553922c5e8f44f27726


commit 459f24b53a875bb7fe409553922c5e8f44f27726
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Apr 21 21:58:52 2011 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Apr 21 21:58:52 2011 +0200

    symbolify egg name (-list)

diff --git a/chicken-status.scm b/chicken-status.scm
index d1bffed4..d9b3ec5d 100644
--- a/chicken-status.scm
+++ b/chicken-status.scm
@@ -106,7 +106,7 @@
     (for-each
      (lambda (egg)
        (let ((version (assq 'version (read-info egg (repo-path)))))
-	 (pp (list egg (and version (cadr version))))))
+	 (pp (list (string->symbol egg) (and version (cadr version))))))
      (gather-all-eggs)))
 
   (define (usage code)
Trap