*** tcl8.5.9-orig/generic/tclEvent.c	2009-10-07 23:10:50.000000000 +0000
--- tcl8.5.9/generic/tclEvent.c	2013-03-01 16:45:22.737864158 +0000
***************
*** 984,990 ****
--- 984,992 ----
  	}
  	TclpInitUnlock();
      }
+ #ifndef TCL_THREADS
      TclInitNotifier();
+ #endif
  }
  
  /*
***************
*** 1237,1243 ****
--- 1239,1247 ----
  	    ckfree((char *) exitPtr);
  	}
  	TclFinalizeIOSubsystem();
+ #ifndef TCL_THREADS
  	TclFinalizeNotifier();
+ #endif
  	TclFinalizeAsync();
  	TclFinalizeThreadObjects();
      }
