Apparently the code to forestall Tk eating events was too aggressive (Tk user input stopped working). Fixed (I hope:-).

This commit is contained in:
Jack Jansen 2001-04-26 13:22:33 +00:00
parent 53b809d673
commit 69f086cbb6

View file

@ -94,9 +94,11 @@ TkIsTheBoss(void)
WindowRef windowRef; WindowRef windowRef;
windowRef = FrontWindow(); windowRef = FrontWindow();
if ( windowRef && !TkMacGetXWindow(windowRef) ) { if ( !windowRef )
return 0;
if ( TkMacGetXWindow(windowRef) )
return 1;
return 0; return 0;
}
} }
/* /*
*---------------------------------------------------------------------- *----------------------------------------------------------------------
@ -347,8 +349,6 @@ Tcl_WaitForEvent(
found = 1; found = 1;
} }
if ( !TkIsTheBoss() )
found = 1;
/* /*
* Check for window events. We may receive a NULL event for * Check for window events. We may receive a NULL event for
* various reasons. 1) the timer has expired, 2) a mouse moved * various reasons. 1) the timer has expired, 2) a mouse moved