summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--tests/winFCmd.test3
2 files changed, 7 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 73d435d..4bd5086 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2003-11-21 Don Porter <dgp@users.sourceforge.net>
+
+ * tests/windFCmd.test (winFCmd-16.10): Corrected failure to
+ initialize variable $dd that caused test suite failure.
+
2003-11-20 Miguel Sofer <msofer@users.sf.net>
*** 8.4.5 TAGGED FOR RELEASE ***
diff --git a/tests/winFCmd.test b/tests/winFCmd.test
index be2cc85..78d85c9 100644
--- a/tests/winFCmd.test
+++ b/tests/winFCmd.test
@@ -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: winFCmd.test,v 1.20.2.2 2003/11/20 19:05:45 vincentdarley Exp $
+# RCS: @(#) $Id: winFCmd.test,v 1.20.2.3 2003/11/21 16:19:15 dgp Exp $
#
if {[lsearch [namespace children] ::tcltest] == -1} {
@@ -1002,6 +1002,7 @@ test winFCmd-16.8 {Windows file normalization} {pcOnly} {
test winFCmd-16.9 {Windows file normalization} {pcOnly} {
file norm /bar/foo
} "${d}:/bar/foo"
+if {$d eq "C"} { set dd "D" } else { set dd "C" }
test winFCmd-16.10 {Windows file normalization} {pcOnly} {
file norm ${dd}:foo
} "${dd}:/foo"