diff options
| author | dgp <dgp@users.sourceforge.net> | 2011-10-31 17:08:57 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2011-10-31 17:08:57 (GMT) |
| commit | 5e21b8c75e74ebb13586c2777871e6c99ea5a9ad (patch) | |
| tree | 339776b9bdffa1057f43072636ff410db7c5ec82 /tests | |
| parent | d4fec9cd6583ff28cefdc7a99303da6f815b65a2 (diff) | |
| parent | cf9df921f620da4fa43f83f17cee6b789c910002 (diff) | |
| download | tcl-5e21b8c75e74ebb13586c2777871e6c99ea5a9ad.zip tcl-5e21b8c75e74ebb13586c2777871e6c99ea5a9ad.tar.gz tcl-5e21b8c75e74ebb13586c2777871e6c99ea5a9ad.tar.bz2 | |
3414754 Fix the PATHFLAGS != 0 intrep normalizing trailing slashes.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/fileSystem.test | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/fileSystem.test b/tests/fileSystem.test index 4191713..9950dde 100644 --- a/tests/fileSystem.test +++ b/tests/fileSystem.test @@ -920,6 +920,10 @@ test filesystem-9.9 {path objects and glob and file tail and tilde} -setup { # ---------------------------------------------------------------------- +test filesystem-10.1 {Bug 3414754} { + string match */ [file join [pwd] foo/] +} 0 + cleanupTests unset -nocomplain drive drives } |