diff options
| author | hobbs <hobbs> | 2001-05-15 20:03:05 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 2001-05-15 20:03:05 (GMT) |
| commit | 951c1014fc8daaae2ba8d1c6d4f128314f945311 (patch) | |
| tree | 47c83ebae12ca07b9e9fa3091093fc5a7aca1270 /tests | |
| parent | 9490b9722cf813e7667c1567978d10eb30a5a8ac (diff) | |
| download | tcl-951c1014fc8daaae2ba8d1c6d4f128314f945311.zip tcl-951c1014fc8daaae2ba8d1c6d4f128314f945311.tar.gz tcl-951c1014fc8daaae2ba8d1c6d4f128314f945311.tar.bz2 | |
updated tests to not break when someone has a C:/test directory
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/fileName.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/fileName.test b/tests/fileName.test index a13b862..f6ab162 100644 --- a/tests/fileName.test +++ b/tests/fileName.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: fileName.test,v 1.9 2000/09/29 01:12:15 hobbs Exp $ +# RCS: @(#) $Id: fileName.test,v 1.9.4.1 2001/05/15 20:03:05 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -1475,13 +1475,13 @@ test filename-16.4 {windows specific globbing} {pcOnly} { glob c:/ } c:/ test filename-16.5 {windows specific globbing} {pcOnly} { - glob c:*Test + glob c:*bTest } c:globTest test filename-16.6 {windows specific globbing} {pcOnly} { - glob c:\\\\*Test + glob c:\\\\*bTest } c:/globTest test filename-16.7 {windows specific globbing} {pcOnly} { - glob c:/*Test + glob c:/*bTest } c:/globTest test filename-16.8 {windows specific globbing} {pcOnly} { lsort [glob c:globTest/*.bat] |