diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-07-07 07:54:23 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-07-07 07:54:23 (GMT) |
| commit | bfbe28c59fdab9fbc0c953a39895d40d09a8b7b4 (patch) | |
| tree | e09bb7cdc4d2f867023a0b115669a3c0de2fd7d9 /tests/fileName.test | |
| parent | 24dafc6f1e95927a0629d988e462409d12c17c52 (diff) | |
| parent | 72476cdd50825cebaea367188325e69ea5a8ff40 (diff) | |
| download | tcl-bfbe28c59fdab9fbc0c953a39895d40d09a8b7b4.zip tcl-bfbe28c59fdab9fbc0c953a39895d40d09a8b7b4.tar.gz tcl-bfbe28c59fdab9fbc0c953a39895d40d09a8b7b4.tar.bz2 | |
merge trunk
Diffstat (limited to 'tests/fileName.test')
| -rw-r--r-- | tests/fileName.test | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/tests/fileName.test b/tests/fileName.test index 2dac0df..858d206 100644 --- a/tests/fileName.test +++ b/tests/fileName.test @@ -1468,14 +1468,16 @@ if {[testConstraint testsetplatform]} { } test filename-17.2 {windows specific glob with executable} -body { makeDirectory execglob - makeFile contents execglob/abc.exe - makeFile contents execglob/abc.notexecutable - glob -nocomplain -dir [temporaryDirectory]/execglob -tails -types x * + foreach ext {exe com cmd bat ps1 notexecutable} { + makeFile contents execglob/abc.$ext + } + lsort [glob -nocomplain -dir [temporaryDirectory]/execglob -tails -types x *] } -constraints {win} -cleanup { - removeFile execglob/abc.exe - removeFile execglob/abc.notexecutable + foreach ext {exe com cmd bat ps1 notexecutable} { + removeFile execglob/abc.$ext + } removeDirectory execglob -} -result {abc.exe} +} -result {abc.bat abc.cmd abc.com abc.exe abc.ps1} test filename-17.3 {Bug 2571597} win { set p /a file pathtype $p |