*** tkMacOSXNotify.c.old	Thu Jan 23 22:51:46 2014
--- tkMacOSXNotify.c.new	Thu Jan 23 22:54:59 2014
***************
*** 44,54 ****
  {
      NSAutoreleasePool *pool = [NSAutoreleasePool new];
  
-     int oldMode = Tcl_SetServiceMode(TCL_SERVICE_ALL);
      NSEvent *event = [[super nextEventMatchingMask:mask untilDate:expiration
  	    inMode:mode dequeue:deqFlag] retain];
  
-     Tcl_SetServiceMode(oldMode);
      if (event) {
  	TSD_INIT();
  	if (tsdPtr->sendEventNestingLevel) {
--- 44,52 ----
