diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-06-25 11:55:46 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-06-25 11:55:46 (GMT) |
| commit | 01eab1b3890706a987bfd038c2193a060660d823 (patch) | |
| tree | 91f1e0c532b8d1c59a5a307206b833c245b68140 /tests/fileName.test | |
| parent | bc7ed66ad757475d649f77ef0a52c71966b8c42a (diff) | |
| parent | 3b5f5de0a5c31cd0891ca0398b8573ce3e7111b8 (diff) | |
| download | tcl-01eab1b3890706a987bfd038c2193a060660d823.zip tcl-01eab1b3890706a987bfd038c2193a060660d823.tar.gz tcl-01eab1b3890706a987bfd038c2193a060660d823.tar.bz2 | |
merge 8.5
Diffstat (limited to 'tests/fileName.test')
| -rw-r--r-- | tests/fileName.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/fileName.test b/tests/fileName.test index c613068..a91f4b3 100644 --- a/tests/fileName.test +++ b/tests/fileName.test @@ -189,7 +189,7 @@ test filename-4.12 {Tcl_SplitPath: unix} {testsetplatform} { test filename-4.13 {Tcl_SplitPath: unix} {testsetplatform} { testsetplatform unix file split //foo -} {/ foo} +} "[file split //] foo" test filename-4.14 {Tcl_SplitPath: unix} {testsetplatform} { testsetplatform unix file split foo//bar @@ -429,11 +429,11 @@ test filename-7.16 {Tcl_JoinPath: unix} {testsetplatform} { test filename-7.17 {Tcl_JoinPath: unix} {testsetplatform} { testsetplatform unix file join //a b -} {/a/b} +} "[file split //]a/b" test filename-7.18 {Tcl_JoinPath: unix} {testsetplatform} { testsetplatform unix file join /// a b -} {/a/b} +} "[file split //]a/b" test filename-9.1 {Tcl_JoinPath: win} {testsetplatform} { |