fix wxme exception handler

svn: r12625
This commit is contained in:
Matthew Flatt 2008-11-27 19:39:37 +00:00
parent e0e672e9ca
commit 3ccd8059a5

View File

@ -594,7 +594,7 @@
(call-with-parameterization
plain-params
(lambda ()
(with-handlers ([exn:fail:read? (lambda () 'no-good)])
(with-handlers ([exn:fail:read? (lambda (x) 'no-good)])
(read port)))))
;; ----------------------------------------