summaryrefslogtreecommitdiffstats
path: root/Mac/tclmods
diff options
context:
space:
mode:
authorJack Jansen <jack.jansen@cwi.nl>2001-04-26 13:22:33 (GMT)
committerJack Jansen <jack.jansen@cwi.nl>2001-04-26 13:22:33 (GMT)
commit69f086cbb675b6119a24a8b9f070c61218ccda1a (patch)
tree2fe3bde43d1241fcdaa7f5f54d1a5639c67d6a03 /Mac/tclmods
parent53b809d6739249c02436d560fa69d7245039b624 (diff)
downloadcpython-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.c10
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(&currentMouse);
@@ -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