From 30e59e8121633750bc18de094d05911b08f35318 Mon Sep 17 00:00:00 2001
From: das <das>
Date: Fri, 20 May 2005 02:50:17 +0000
Subject: 	* macosx/tclMacOSXNotify.c (Tcl_InitNotifier): fixed crashing 
 CFRelease of runLoopSource in Tcl_InitNotifier (reported by Zoran): 
 CFRunLoopAddSource doesn't CFRetain, so can only CFRelease the 
 runLoopSource in Tcl_FinalizeNotifier.

---
 macosx/tclMacOSXNotify.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/macosx/tclMacOSXNotify.c b/macosx/tclMacOSXNotify.c
index e091888..95cc46f 100644
--- a/macosx/tclMacOSXNotify.c
+++ b/macosx/tclMacOSXNotify.c
@@ -13,7 +13,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclMacOSXNotify.c,v 1.2 2005/05/19 13:27:28 das Exp $
+ * RCS: @(#) $Id: tclMacOSXNotify.c,v 1.3 2005/05/20 02:50:17 das Exp $
  */
 
 #ifdef HAVE_COREFOUNDATION /* Traditional unix select-based notifier
@@ -362,7 +362,7 @@ Tcl_FinalizeNotifier(clientData)
         tsdPtr->runLoop = NULL;
         /* Remove runLoopSource from all CFRunLoops and release it */
         CFRunLoopSourceInvalidate(tsdPtr->runLoopSource);
-        CFRelease(runLoopSource);
+        CFRelease(tsdPtr->runLoopSource);
         tsdPtr->runLoopSource = NULL;
     }
     UNLOCK_NOTIFIER;
-- 
cgit v0.12