diff options
author | dgp <dgp@users.sourceforge.net> | 2019-10-21 18:10:29 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2019-10-21 18:10:29 (GMT) |
commit | 783d209ab7ffc13de7ffa01a73da5bc40a18993e (patch) | |
tree | 96ad8f9f09cbbf1b10074a12483280b97b4a261c /tests | |
parent | c9d50be3b9d31a5e6339eae35dd3b04ee3b6913f (diff) | |
download | tcl-783d209ab7ffc13de7ffa01a73da5bc40a18993e.zip tcl-783d209ab7ffc13de7ffa01a73da5bc40a18993e.tar.gz tcl-783d209ab7ffc13de7ffa01a73da5bc40a18993e.tar.bz2 |
Bump to dde 1.4.2 and registry 1.3.4.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/fCmd.test | 2 | ||||
-rw-r--r-- | tests/registry.test | 4 | ||||
-rw-r--r-- | tests/winDde.test | 4 |
3 files changed, 5 insertions, 5 deletions
diff --git a/tests/fCmd.test b/tests/fCmd.test index 040882b..7c8c49f 100644 --- a/tests/fCmd.test +++ b/tests/fCmd.test @@ -30,7 +30,7 @@ testConstraint reg 0 if {[testConstraint win]} { if {![catch { ::tcltest::loadTestedCommands - set ::regver [package require registry 1.3.3] + set ::regver [package require registry 1.3.4] }]} { testConstraint reg 1 } diff --git a/tests/registry.test b/tests/registry.test index 539ba2d..86f4ef3 100644 --- a/tests/registry.test +++ b/tests/registry.test @@ -19,7 +19,7 @@ testConstraint reg 0 if {[testConstraint win]} { if {![catch { ::tcltest::loadTestedCommands - set ::regver [package require registry 1.3.3] + set ::regver [package require registry 1.3.4] }]} { testConstraint reg 1 } @@ -33,7 +33,7 @@ testConstraint english [expr { test registry-1.0 {check if we are testing the right dll} {win reg} { set ::regver -} {1.3.3} +} {1.3.4} test registry-1.1 {argument parsing for registry command} {win reg} { list [catch {registry} msg] $msg } {1 {wrong # args: should be "registry ?-32bit|-64bit? option ?arg ...?"}} diff --git a/tests/winDde.test b/tests/winDde.test index 1fa7e86..412c476 100644 --- a/tests/winDde.test +++ b/tests/winDde.test @@ -20,7 +20,7 @@ testConstraint dde 0 if {[testConstraint win]} { if {![catch { ::tcltest::loadTestedCommands - set ::ddever [package require dde 1.4.1] + set ::ddever [package require dde 1.4.2] set ::ddelib [lindex [package ifneeded dde $::ddever] 1]}]} { testConstraint dde 1 } @@ -104,7 +104,7 @@ proc createChildProcess {ddeServerName args} { # ------------------------------------------------------------------------- test winDde-1.0 {check if we are testing the right dll} {win dde} { set ::ddever -} {1.4.1} +} {1.4.2} test winDde-1.1 {Settings the server's topic name} -constraints dde -body { list [dde servername foobar] [dde servername] [dde servername self] |