diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-06 17:33:22 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-06 17:33:22 (GMT) |
| commit | d60bc321ce3c20557744e9e4ac1d5ae45f0d7ee3 (patch) | |
| tree | b14e639adb3b3c06047bf9c8edf4725f65bafc3d /tests | |
| parent | 89e3b6811bfe4023587eeb490ddbe14d1c201ffe (diff) | |
| parent | 4404292972214f5a699f956595d5b66539e08fc6 (diff) | |
| download | tcl-d60bc321ce3c20557744e9e4ac1d5ae45f0d7ee3.zip tcl-d60bc321ce3c20557744e9e4ac1d5ae45f0d7ee3.tar.gz tcl-d60bc321ce3c20557744e9e4ac1d5ae45f0d7ee3.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/winDde.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/winDde.test b/tests/winDde.test index d2fb8a0..421578b 100644 --- a/tests/winDde.test +++ b/tests/winDde.test @@ -20,7 +20,7 @@ if {[testConstraint win]} { if {![catch { ::tcltest::loadTestedCommands set ::ddever [package require dde 1.4.3] - set ::ddelib [lindex [package ifneeded dde $::ddever] 1]}]} { + set ::ddelib [info loaded "" Dde]}]} { testConstraint dde 1 } } @@ -38,7 +38,7 @@ proc createChildProcess {ddeServerName args} { set f [open $::scriptName w+] puts $f [list set ddeServerName $ddeServerName] - puts $f [list load $::ddelib dde] + puts $f [list load $::ddelib Dde] puts $f { # DDE child server - # |