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