From 3e73ccbf61f0a1fdf7a7483fadda334649bd0cae Mon Sep 17 00:00:00 2001
From: das <das>
Date: Tue, 13 May 2003 08:40:58 +0000
Subject: 	* macosx/tkMacOSXInit.c (TkpInit): use new versioned bundle 
 resource API to get tk runtime library for TK_VERSION. [Bug 736774]

---
 ChangeLog             | 5 +++++
 macosx/tkMacOSXInit.c | 6 +++---
 2 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 365651d..37a8eca 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2003-05-13  Daniel Steffen  <das@users.sourceforge.net>
+
+	* macosx/tkMacOSXInit.c (TkpInit): use new versioned bundle 
+	resource API to get tk runtime library for TK_VERSION. [Bug 736774]
+
 2003-05-10  Jeff Hobbs  <jeffh@ActiveState.com>
 
 	* generic/tkCanvPoly.c (PolygonToPostscript):
diff --git a/macosx/tkMacOSXInit.c b/macosx/tkMacOSXInit.c
index 2180769..babd977 100644
--- a/macosx/tkMacOSXInit.c
+++ b/macosx/tkMacOSXInit.c
@@ -10,7 +10,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tkMacOSXInit.c,v 1.3 2002/10/16 19:44:05 das Exp $
+ * RCS: @(#) $Id: tkMacOSXInit.c,v 1.4 2003/05/13 08:40:58 das Exp $
  */
 
 #include "tkInt.h"
@@ -143,8 +143,8 @@ TkpInit(interp)
      * FIXME: Should we come up with a more generic way of doing this?
      */
      
-    result = Tcl_MacOSXOpenBundleResources(interp, "com.tcltk.tklibrary", 
-                1, 1024, tkLibPath);
+    result = Tcl_MacOSXOpenVersionedBundleResources(interp, 
+    	    "com.tcltk.tklibrary", TK_VERSION, 1, 1024, tkLibPath);
      
     if (result != TCL_ERROR) {
         Tcl_SetVar(interp, "tk_library", tkLibPath, TCL_GLOBAL_ONLY);
-- 
cgit v0.12