diff --git a/gui-lib/mred/private/wxme/editor-canvas.rkt b/gui-lib/mred/private/wxme/editor-canvas.rkt
index f05a6e8d..0dab8ac9 100644
--- a/gui-lib/mred/private/wxme/editor-canvas.rkt
+++ b/gui-lib/mred/private/wxme/editor-canvas.rkt
@@ -92,7 +92,9 @@
     
     (define/override (notify)
       (when canvas
-        (send canvas blink-caret)))
+	(if (send canvas is-shown-to-root?)
+            (send canvas blink-caret)
+	    (kill))))
 
     (define/public (kill)
       (set! canvas #f)
@@ -144,7 +146,7 @@
   (append
    (if (or (memq 'no-hscroll style)
            (memq 'hide-hscroll style))
-       null
+        null
        '(hscroll))
    (if (or (memq 'no-vscroll style)
            (memq 'hide-vscroll style))