~ chicken-core (chicken-5) 25f881172613e0573bc98cb29d4202e4569bb9f8

commit 25f881172613e0573bc98cb29d4202e4569bb9f8
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Wed Apr 14 09:07:19 2010 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Wed Apr 14 09:11:50 2010 +0200

    removed some debug output

diff --git a/setup-api.scm b/setup-api.scm
index ed3dfd03..9bde7a16 100644
--- a/setup-api.scm
+++ b/setup-api.scm
@@ -475,7 +475,6 @@
     to))
 
 (define (path-prefix? pref path)
-  (print (list pref path))
   (string-prefix?
    (normalize-pathname pref)
    (normalize-pathname path)))