diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2010-01-02 00:00:20 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2010-01-02 00:00:20 (GMT) |
| commit | d4523ee883b672de428e39fb62948ad52622612f (patch) | |
| tree | df32a933b6aca00c7d709d7845d215ea20970345 /unix/tkUnixEvent.c | |
| parent | 81feb71d03ad39d776b68a9ecb1785b8120aad83 (diff) | |
| download | tk-d4523ee883b672de428e39fb62948ad52622612f.zip tk-d4523ee883b672de428e39fb62948ad52622612f.tar.gz tk-d4523ee883b672de428e39fb62948ad52622612f.tar.bz2 | |
Oops!
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); |