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 | |
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')
-rw-r--r-- | tests/fileName.test | 6 | ||||
-rw-r--r-- | tests/msgcat.test | 4 |
2 files changed, 5 insertions, 5 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} { diff --git a/tests/msgcat.test b/tests/msgcat.test index 0669810..6fe4b31 100644 --- a/tests/msgcat.test +++ b/tests/msgcat.test @@ -17,8 +17,8 @@ if {[catch {package require tcltest 2}]} { puts stderr "Skipping tests in [info script]. tcltest 2 required." return } -if {[catch {package require msgcat 1.4.2}]} { - puts stderr "Skipping tests in [info script]. No msgcat 1.4.2 found to test." +if {[catch {package require msgcat 1.4.4}]} { + puts stderr "Skipping tests in [info script]. No msgcat 1.4.4 found to test." return } |