summaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
authorculler <culler>2020-05-12 15:12:51 (GMT)
committerculler <culler>2020-05-12 15:12:51 (GMT)
commitf295f92dd0c2e638798d2e8c937eb6dd15090d45 (patch)
tree34a29fe2eff1ddb12dfe5beba5c029103967a01c /library
parent5ea84f1facd9798ae08f5d0d49fb5237ec125bf2 (diff)
parent523aa062a1f89ea321f1d046e44486dc6523d3f1 (diff)
downloadtk-f295f92dd0c2e638798d2e8c937eb6dd15090d45.zip
tk-f295f92dd0c2e638798d2e8c937eb6dd15090d45.tar.gz
tk-f295f92dd0c2e638798d2e8c937eb6dd15090d45.tar.bz2
Fix [585584ad66]: On Aqua, keysyms are incomplete and inconsistent for generated events. Key event handling was completely reworked.
Diffstat (limited to 'library')
-rw-r--r--library/tk.tcl14
1 files changed, 6 insertions, 8 deletions
diff --git a/library/tk.tcl b/library/tk.tcl
index bfaacef..311d316 100644
--- a/library/tk.tcl
+++ b/library/tk.tcl
@@ -462,14 +462,12 @@ switch -exact -- [tk windowingsystem] {
# Official bindings
# See http://support.apple.com/kb/HT1343
event add <<SelectAll>> <Command-a>
- #Attach function keys not otherwise assigned to this event so they no-op - workaround for bug 0e6930dfe7
- event add <<SelectNone>> <Option-Command-a> <F5> <F1> <F5> <F6> <F7> <F8> <F9> <F10> <F11> <F12>
- event add <<Undo>> <Command-z> <Command-Lock-Z>
- event add <<Redo>> <Shift-Command-z> <Shift-Command-Lock-z>
- event add <<NextChar>> <Right> <Control-f> <Control-Lock-F>
- event add <<SelectNextChar>> <Shift-Right> <Shift-Control-F> <Shift-Control-Lock-F>
- event add <<PrevChar>> <Left> <Control-b> <Control-Lock-B>
- event add <<SelectPrevChar>> <Shift-Left> <Shift-Control-B> <Shift-Control-Lock-B>
+ event add <<Undo>> <Command-Key-z> <Command-Lock-Key-Z>
+ event add <<Redo>> <Shift-Command-Key-z> <Shift-Command-Lock-Key-z>
+ event add <<NextChar>> <Right> <Control-Key-f> <Control-Lock-Key-F>
+ event add <<SelectNextChar>> <Shift-Right> <Shift-Control-Key-F> <Shift-Control-Lock-Key-F>
+ event add <<PrevChar>> <Left> <Control-Key-b> <Control-Lock-Key-B>
+ event add <<SelectPrevChar>> <Shift-Left> <Shift-Control-Key-B> <Shift-Control-Lock-Key-B>
event add <<NextWord>> <Option-Right>
event add <<SelectNextWord>> <Shift-Option-Right>
event add <<PrevWord>> <Option-Left>