fixed comment boxes

svn: r426 original commit: fa19336839a556de2ce9838be179325a47146390
2005-07-21 21:06:03 +00:00 · 2005-07-21 21:06:03 +00:00 · 220ed5be1f
commit 220ed5be1f
parent f84ee014d5
1 changed files with 1 additions and 1 deletions
--- a/collects/framework/private/comment-box.ss
+++ b/collects/framework/private/comment-box.ss
@ -124,7 +124,7 @@
                [else acc])))
          
          (define/public (read-special source line column position)
-            (raise (make-special-comment "comment")))
+            (make-special-comment "comment"))
          (super-instantiate ())
          (inherit set-snipclass)
          (set-snipclass snipclass))))))