summaryrefslogtreecommitdiffstats
path: root/tests/winFCmd.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2003-11-21 16:19:15 (GMT)
committerdgp <dgp@users.sourceforge.net>2003-11-21 16:19:15 (GMT)
commit1d8ec1bada7fbdca1b015eadc1c68dbed2974443 (patch)
treedfc62dbd9dd84d7a5cc078facc07ca0fe978a10a /tests/winFCmd.test
parent7705a1ed42f007de102db1e2f8f193b0d2948761 (diff)
downloadtcl-1d8ec1bada7fbdca1b015eadc1c68dbed2974443.zip
tcl-1d8ec1bada7fbdca1b015eadc1c68dbed2974443.tar.gz
tcl-1d8ec1bada7fbdca1b015eadc1c68dbed2974443.tar.bz2
* tests/windFCmd.test (winFCmd-16.10): Corrected failure to
initialize variable $dd that caused test suite failure.
Diffstat (limited to 'tests/winFCmd.test')
-rw-r--r--tests/winFCmd.test3
1 files changed, 2 insertions, 1 deletions
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"