diff options
author | Jack Jansen <jack.jansen@cwi.nl> | 2001-04-26 13:22:33 (GMT) |
---|---|---|
committer | Jack Jansen <jack.jansen@cwi.nl> | 2001-04-26 13:22:33 (GMT) |
commit | 69f086cbb675b6119a24a8b9f070c61218ccda1a (patch) | |
tree | 2fe3bde43d1241fcdaa7f5f54d1a5639c67d6a03 /Mac/tclmods | |
parent | 53b809d6739249c02436d560fa69d7245039b624 (diff) | |
download | cpython-69f086cbb675b6119a24a8b9f070c61218ccda1a.zip cpython-69f086cbb675b6119a24a8b9f070c61218ccda1a.tar.gz cpython-69f086cbb675b6119a24a8b9f070c61218ccda1a.tar.bz2 |
Apparently the code to forestall Tk eating events was too aggressive (Tk user input stopped working). Fixed (I hope:-).
Diffstat (limited to 'Mac/tclmods')
-rw-r--r-- | Mac/tclmods/tclMacNotify.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Mac/tclmods/tclMacNotify.c b/Mac/tclmods/tclMacNotify.c index 3d2695c..d8737ae 100644 --- a/Mac/tclmods/tclMacNotify.c +++ b/Mac/tclmods/tclMacNotify.c @@ -94,9 +94,11 @@ TkIsTheBoss(void) WindowRef windowRef; windowRef = FrontWindow(); - if ( windowRef && !TkMacGetXWindow(windowRef) ) { + if ( !windowRef ) return 0; - } + if ( TkMacGetXWindow(windowRef) ) + return 1; + return 0; } /* *---------------------------------------------------------------------- @@ -209,7 +211,7 @@ HandleMacEvents(void) */ while (needsUpdate || (GetEvQHdr()->qHead != NULL)) { - /* Give Python command-. handling a chance */ + /* Give Python command-. handling a chance */ PyMac_DoYield(0, 0); GetGlobalMouse(¤tMouse); @@ -347,8 +349,6 @@ Tcl_WaitForEvent( found = 1; } - if ( !TkIsTheBoss() ) - found = 1; /* * Check for window events. We may receive a NULL event for * various reasons. 1) the timer has expired, 2) a mouse moved |