Posted to tcl by chw at Fri Nov 01 16:27:24 GMT 2019view raw

  1. # objective: the sequence Ctrl+x followed by "X" shall do something
  2.  
  3. # doesn't work
  4. bind all <Control-x><Shift-x> {puts nada}
  5.  
  6. # doesn't work
  7. bind all <Control-x>X {puts nope}
  8.  
  9. # does work for the left Shift key
  10. bind all <Control-x><Shift_L>X {puts yeah}
  11.  
  12. # does work for the right Shift key
  13. bind all <Control-x><Shift_R>X {puts yep}
  14.  
  15. # tried out on various Linuxen with X11 and X on Wayland

Comments

Posted by chw at Sat Nov 02 09:28:03 GMT 2019 [text] [code]

Clarification: this is observed in a core-8-6-branch build which is later than 8.6.9 and most likely becomes 8.6.10.

Posted by chw at Sat Nov 02 09:32:47 GMT 2019 [text] [code]

More clarification: # this works in 8.5 ... 8.6.9 bind all <Control-x><Shift-X> {puts yep!}