diff options
| author | wolfsuit <wolfsuit> | 2004-02-16 23:09:23 (GMT) |
|---|---|---|
| committer | wolfsuit <wolfsuit> | 2004-02-16 23:09:23 (GMT) |
| commit | 529402c74caad6427229c711ad5998294300baad (patch) | |
| tree | 69f58a89b8fb407fc269b837af99f9d81fed77ca /generic/tkEvent.c | |
| parent | bd2e07339a6724dce174ffd6cbd6b66677db3f2f (diff) | |
| download | tk-529402c74caad6427229c711ad5998294300baad.zip tk-529402c74caad6427229c711ad5998294300baad.tar.gz tk-529402c74caad6427229c711ad5998294300baad.tar.bz2 | |
This gets the scroll wheel working for listboxes and text widgets for Mac OS
X. It also changes the model to route scrollwheel events to the window under
the pointer, not the focus window on X (and only on X). That is the correct
behavior for Mac OS X.
Diffstat (limited to 'generic/tkEvent.c')
| -rw-r--r-- | generic/tkEvent.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/generic/tkEvent.c b/generic/tkEvent.c index f3b61d6..117f873 100644 --- a/generic/tkEvent.c +++ b/generic/tkEvent.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkEvent.c,v 1.17.2.1 2003/07/19 01:03:25 hobbs Exp $ + * RCS: @(#) $Id: tkEvent.c,v 1.17.2.2 2004/02/16 23:09:25 wolfsuit Exp $ */ #include "tkPort.h" @@ -838,7 +838,12 @@ Tk_HandleEvent(eventPtr) * available on the Windows version of Tk. */ +#ifdef MAC_OSX_TK + /* MouseWheel events are not focus specific on Mac OS X */ + if (mask & (KeyPressMask|KeyReleaseMask)) { +#else if (mask & (KeyPressMask|KeyReleaseMask|MouseWheelMask)) { +#endif winPtr->dispPtr->lastEventTime = eventPtr->xkey.time; winPtr = TkFocusKeyEvent(winPtr, eventPtr); if (winPtr == NULL) { |