.

original commit: 2bfdfedacaa0fd044ca6198ebb8074d61fd38b6a
2002-07-07 19:37:36 +00:00 · 2002-07-07 19:37:36 +00:00 · 1f4bdc42e8
commit 1f4bdc42e8
parent 0ee7b48396
1 changed files with 2 additions and 1 deletions
--- a/collects/mred/mred.ss
+++ b/collects/mred/mred.ss
@ -6072,7 +6072,8 @@
 	       (let ([result (dynamic-require m id)])
 		 (if (is-a? result %)
 		     result
-		     (error 'load-class "not a ~a% instance" id))))))])
+		     (error 'load-class "not a ~a% instance" id)))
+	       #f)))])
  ;; install the getters:
  (wx:set-snip-class-getter 
   (lambda (name)