diff options
Diffstat (limited to 'unix/tkUnixEvent.c')
| -rw-r--r-- | unix/tkUnixEvent.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/unix/tkUnixEvent.c b/unix/tkUnixEvent.c index 52e5673..a104aad 100644 --- a/unix/tkUnixEvent.c +++ b/unix/tkUnixEvent.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkUnixEvent.c,v 1.27.2.1 2010/01/01 23:03:42 dkf Exp $ + * RCS: @(#) $Id: tkUnixEvent.c,v 1.27.2.2 2010/01/02 00:00:20 dkf Exp $ */ #include "tkUnixInt.h" @@ -295,13 +295,13 @@ TransferXEventsToTcl( while (QLength(display) > 0) { XNextEvent(display, &event); w = None; - if (event.x.type == KeyPress || event.x.type == KeyRelease) { + if (event.type == KeyPress || event.type == KeyRelease) { TkDisplay *dispPtr; for (dispPtr = TkGetDisplayList(); ; dispPtr = dispPtr->nextPtr) { if (dispPtr == NULL) { break; - } else if (dispPtr->display == event.x.xany.display) { + } else if (dispPtr->display == event.xany.display) { if (dispPtr->focusPtr != NULL) { w = dispPtr->focusPtr->window; } @@ -309,7 +309,7 @@ TransferXEventsToTcl( } } } - if (XFilterEvent(&event.x, w)) { + if (XFilterEvent(&event, w)) { continue; } Tk_QueueWindowEvent(&event, TCL_QUEUE_TAIL); |