diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-05 13:45:51 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-05 13:45:51 (GMT) |
commit | 7104004d579f42d1eb3e7e275c7609b93c1cac20 (patch) | |
tree | 0cf0e0689f8b198cf9ef7ef6aa1f9f8030684825 /tests | |
parent | 392c7ad8eb0265cb56f69f3ae7ebc48a8cb54ec2 (diff) | |
parent | fed1ff66dc94e36bd81d2375954f2f011f8c329a (diff) | |
download | tcl-7104004d579f42d1eb3e7e275c7609b93c1cac20.zip tcl-7104004d579f42d1eb3e7e275c7609b93c1cac20.tar.gz tcl-7104004d579f42d1eb3e7e275c7609b93c1cac20.tar.bz2 |
Merge 8.6
Diffstat (limited to 'tests')
-rw-r--r-- | tests/fileName.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/fileName.test b/tests/fileName.test index 2eeab6e..04273d7 100644 --- a/tests/fileName.test +++ b/tests/fileName.test @@ -1063,10 +1063,10 @@ test filename-11.45 {Tcl_GlobCmd on root volume} -setup { set tmpd [pwd] } -body { catch { - set res1 [glob -dir [lindex [file volumes] end-1] -tails *] + set res1 [glob -dir [lindex [file volumes] end] -tails *] } catch { - cd [lindex [file volumes] end-1] + cd [lindex [file volumes] end] set res2 [glob *] } list $res1 $res2 |