diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-04-19 11:11:00 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-04-19 11:11:00 (GMT) |
commit | c7b3e8d6ca8ff7107e1db5111d22654afda75da4 (patch) | |
tree | cb2cb01691279a3035c51472813011b9bed0826c /library/spinbox.tcl | |
parent | 9a465a22a7b59dbe0609fb32f9e4ff22755ee184 (diff) | |
download | tk-c7b3e8d6ca8ff7107e1db5111d22654afda75da4.zip tk-c7b3e8d6ca8ff7107e1db5111d22654afda75da4.tar.gz tk-c7b3e8d6ca8ff7107e1db5111d22654afda75da4.tar.bz2 |
Fix [8dd3d58c62]: macOS Aqua: Fn + e to access Emoji
Diffstat (limited to 'library/spinbox.tcl')
-rw-r--r-- | library/spinbox.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/library/spinbox.tcl b/library/spinbox.tcl index 3a9e808..8d516bc 100644 --- a/library/spinbox.tcl +++ b/library/spinbox.tcl @@ -205,7 +205,7 @@ bind Spinbox <Key> { ::tk::EntryInsert %W %A } -# Ignore all Alt, Meta, and Control keypresses unless explicitly bound. +# Ignore all Alt, Meta, Control, and Mod4 keypresses unless explicitly bound. # Otherwise, if a widget binding for one of these is defined, the # <Key> class binding will also fire and insert the character, # which is wrong. Ditto for Escape, Return, and Tab. @@ -220,6 +220,7 @@ bind Spinbox <Tab> {# nothing} bind Spinbox <Prior> {# nothing} bind Spinbox <Next> {# nothing} bind Spinbox <Command-Key> {# nothing} +bind Spinbox <Mod4-Key> {# nothing} # On Windows, paste is done using Shift-Insert. Shift-Insert already # generates the <<Paste>> event, so we don't need to do anything here. |