ok to check for editor:basic<%>

svn: r3332 original commit: b7d510e058d39d84f4eeded61b8d6603e022493e
2006-06-11 19:16:43 +00:00 · 2006-06-11 19:16:43 +00:00 · a955f7f97b
commit a955f7f97b
parent dc18fb9c4a
1 changed files with 1 additions and 1 deletions
--- a/collects/framework/private/keymap.ss
+++ b/collects/framework/private/keymap.ss
@ -1232,7 +1232,7 @@
 		(λ (this-edit event)
                  (let ([edit (get-outer-editor this-edit)])
                    (parameterize ([finder:dialog-parent-parameter 
-                                    (and ; (is-a? edit editor:basic<%>)
+                                    (and (is-a? edit editor:basic<%>)
                                         (send edit get-top-level-window))])
                      (let ([file (finder:put-file)])
                        (when file