equal
deleted
inserted
replaced
87 |
87 |
88 "/ ignore some meta keys |
88 "/ ignore some meta keys |
89 (#( |
89 (#( |
90 #'Control_L' #'Control_R' #'Control' #'Ctrl' |
90 #'Control_L' #'Control_R' #'Control' #'Ctrl' |
91 #'CmdMenu' #'BackSpace' #Tab |
91 #'CmdMenu' #'BackSpace' #Tab |
92 #'Cmd_L' #'Cmd_R' #'Cmd' |
92 #'Cmd_L' #'Cmd_R' #'Cmd' #'CmdMenu' |
93 #'Shift_L' #'Shift_R' Shift |
93 #'Shift_L' #'Shift_R' Shift |
94 #'Alt_L' #'Alt_R' #'Alt' |
94 #'Alt_L' #'Alt_R' #'Alt' |
95 #'Super_R' #'Super_L' #'Super' |
95 #'Super_R' #'Super_L' #'Super' |
96 ) includes:aKeyEvent key) ifTrue:[^ true]. |
96 ) includes:aKeyEvent key) ifTrue:[^ true]. |
97 |
97 |
329 ! ! |
329 ! ! |
330 |
330 |
331 !KeyboardProcessor class methodsFor:'documentation'! |
331 !KeyboardProcessor class methodsFor:'documentation'! |
332 |
332 |
333 version |
333 version |
334 ^ '$Header: /cvs/stx/stx/libview2/KeyboardProcessor.st,v 1.37 2006-10-13 11:03:39 cg Exp $' |
334 ^ '$Header: /cvs/stx/stx/libview2/KeyboardProcessor.st,v 1.38 2007-10-19 13:23:40 cg Exp $' |
335 ! ! |
335 ! ! |