diff --git a/pkgs/gui-pkgs/gui-lib/mred/private/wxme/editor-canvas.rkt b/pkgs/gui-pkgs/gui-lib/mred/private/wxme/editor-canvas.rkt
index 30cf301283..9dd7def561 100644
--- a/pkgs/gui-pkgs/gui-lib/mred/private/wxme/editor-canvas.rkt
+++ b/pkgs/gui-pkgs/gui-lib/mred/private/wxme/editor-canvas.rkt
@@ -1192,7 +1192,7 @@
                       (send canvas is-focus-on?))
                   (list (send canvas scroll-to localx localy w h refresh? bias))))))
 
-  (def/override (grab-caret [(symbol-in immediate display global) dist])
+  (def/override (grab-caret [(symbol-in immediate display global) [dist 'global]])
     (when canvas
       (when (eq? dist 'global)
         (send canvas set-focus))))