From b7d510e058d39d84f4eeded61b8d6603e022493e Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Sun, 11 Jun 2006 19:16:43 +0000
Subject: [PATCH] ok to check for editor:basic<%>

svn: r3332
---
 collects/framework/private/keymap.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/framework/private/keymap.ss b/collects/framework/private/keymap.ss
index 33faf96dd3..77bc2420f0 100644
--- 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