2002-04-08 Daniel Steffen <das@users.sourceforge.net>

	* mac/pkgIndex_mac.tcl: synced to generic/pkgIndex.tcl

diff --git a/ChangeLog b/ChangeLog
index 246e5202118624e5ec33c2770c02d831e233ef6c..f1a51e3d8a302a0857d958f41d300cf707fb0baf 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
+2002-04-08  Daniel Steffen  <das@users.sourceforge.net>
+       * mac/pkgIndex_mac.tcl: synced to generic/pkgIndex.tcl
+
 2002-04-01  Vince Darley <vincentdarley@sourceforge.net>
-        * Makefile.in: compilation fix from jcw.
+       * Makefile.in: compilation fix from jcw.
        
 2002-03-16  Vince Darley <vincentdarley@sourceforge.net>
        * generic/vfs.c: updated for latest cvs head of Tcl 8.4a5.

diff --git a/mac/pkgIndex_mac.tcl b/mac/pkgIndex_mac.tcl
index 8082439fc9f2135c43f5675a7b967a11db61ddca..43a98ca6036dfc89f5b316237cc125b9d14a737e 100644 (file)
--- a/mac/pkgIndex_mac.tcl
+++ b/mac/pkgIndex_mac.tcl
@@ -1,5 +1,18 @@
 # Tcl package index file, version 1.1
 
+# We don't really want to throw an error with older versions of
+# Tcl, they should just ignore us.
+if {[package provide Tcl] < 8.4} {
+    return
+}
+
+package require Tcl 8.4
+if {[info tclversion] == 8.4} {
+    if {[regexp {8.4a(1|2|3|4)} [info patchlevel]]} {
+       error "Tcl 8.4a5 (March 20th 2002) or newer is required"
+    }
+}
+
 package ifneeded vfs 1.0 "load [list [file join $dir Vfs[info sharedlibextension]]] vfs
 source -rsrc vfs:tclIndex"