Index: ChangeLog
===================================================================
RCS file: /cvsroot/tcl/tcl/ChangeLog,v
retrieving revision 1.1973
diff -u -r1.1973 ChangeLog
--- ChangeLog	5 May 2004 20:52:29 -0000	1.1973
+++ ChangeLog	5 May 2004 21:16:31 -0000
@@ -1,3 +1,9 @@
+2004-05-05  Don Porter  <dgp@users.sourceforge.net>
+
+	* tests/unixInit.test (unixInit-2.10):	Test correction for Mac OSX.
+	Be sure to consistently compare normalized path names.  Thanks to
+	Steven Abner (tauvan).  [Bug 948177]
+
 2004-05-05  Donal K. Fellows  <donal.k.fellows@man.ac.uk>
 
 	* doc/CrtObjCmd.3: Remove reference to Tcl_RenameCommand; there is
Index: tests/unixInit.test
===================================================================
RCS file: /cvsroot/tcl/tcl/tests/unixInit.test,v
retrieving revision 1.35
diff -u -r1.35 unixInit.test
--- tests/unixInit.test	6 Apr 2004 14:35:39 -0000	1.35
+++ tests/unixInit.test	5 May 2004 21:16:32 -0000
@@ -281,7 +281,11 @@
     cd $libDir
 } -body {
     # Checking for Bug 832657
-    lrange [getlibpath [file join .. bin tcltest]] 2 3
+    set x [lrange [getlibpath [file join .. bin tcltest]] 2 3]
+    foreach p $x {
+	lappend y [file normalize $p]
+    }
+    set y
 } -cleanup {
     cd $saveDir
     unset saveDir
@@ -297,6 +301,7 @@
     removeDirectory sparkly $tmpDir
     unset tmpDir
     removeDirectory tmp
+    unset x p y
 } -result [list [file join [temporaryDirectory] tmp sparkly library] \
 	[file join [temporaryDirectory] tmp library] ]
 
