From ff4470fa2e6a9036e1f0b53d3cf2ee592e94e8d4 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Tue, 20 Jun 2006 20:52:38 +0000
Subject: [PATCH] PR8134

svn: r3423
---
 collects/slibinit/init.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/slibinit/init.ss b/collects/slibinit/init.ss
index 340911aefc..f6dc965be7 100644
--- a/collects/slibinit/init.ss
+++ b/collects/slibinit/init.ss
@@ -69,7 +69,7 @@
           ;; Use this getenv if your implementation supports it.
           (getenv "SCHEME_LIBRARY_PATH")
           ;; Try an slib collection first
-          (with-handlers ([void #f])
+          (with-handlers ([void (lambda (e) #f)])
             (path->string (collection-path "slib")))
           ;; look for slib in a few common places
           (ormap (lambda (dir)