diff --git a/pkgs/gui-pkgs/gui-lib/framework/private/keymap.rkt b/pkgs/gui-pkgs/gui-lib/framework/private/keymap.rkt
index 392843a05f..cf45f6d553 100644
--- a/pkgs/gui-pkgs/gui-lib/framework/private/keymap.rkt
+++ b/pkgs/gui-pkgs/gui-lib/framework/private/keymap.rkt
@@ -1351,7 +1351,7 @@
       (λ (kmap)
         (let* ([map (λ (key func) 
                       (send kmap map-function key func))]
-               [map-meta (λ (key func mask-control?)
+               [map-meta (λ (key func)
                            (send-map-function-meta kmap key func
                                                    (regexp-match has-control-regexp key)))]
                [add (λ (name func)