Posted to tcl by patthoyts at Thu May 21 22:37:39 GMT 2009view raw

  1. diff --git a/win/tkWinMenu.c b/win/tkWinMenu.c
  2. index 5e86f6a..718893c 100644
  3. --- a/win/tkWinMenu.c
  4. +++ b/win/tkWinMenu.c
  5. @@ -1986,10 +1986,11 @@ TkWinMenuKeyObjCmd(
  6. WM_SYSKEYDOWN, virtualKey,
  7. (int) ((scanCode << 16) | (1 << 29)));
  8. if (eventPtr->xkey.nbytes > 0) {
  9. - for (i = 0; i < eventPtr->xkey.nbytes; i++) {
  10. + XKeyEvent xkey = eventPtr->xkey;
  11. + for (i = 0; i < xkey.nbytes; i++) {
  12. CallWindowProc(DefWindowProc,
  13. Tk_GetHWND(Tk_WindowId(tkwin)), WM_SYSCHAR,
  14. - eventPtr->xkey.trans_chars[i],
  15. + xkey.trans_chars[i],
  16. (int) ((scanCode << 16) | (1 << 29)));
  17. }
  18. }