diff options
| author | dgp <dgp@users.sourceforge.net> | 2002-07-14 05:48:45 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2002-07-14 05:48:45 (GMT) |
| commit | f79b432c7c47051e0c7e11bd52e82547ad7aacf2 (patch) | |
| tree | 506cf7b5383406d4969854b8209566f9c0b690c6 /tests/macEmbed.test | |
| parent | 213541e4a3a5a49415c0f9f8d37a5cbce28f89f7 (diff) | |
| download | tk-f79b432c7c47051e0c7e11bd52e82547ad7aacf2.zip tk-f79b432c7c47051e0c7e11bd52e82547ad7aacf2.tar.gz tk-f79b432c7c47051e0c7e11bd52e82547ad7aacf2.tar.bz2 | |
* Completed conversion of Tk test suite to use tcltest.
Diffstat (limited to 'tests/macEmbed.test')
| -rw-r--r-- | tests/macEmbed.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/macEmbed.test b/tests/macEmbed.test index e5a7bab..fe68f21 100644 --- a/tests/macEmbed.test +++ b/tests/macEmbed.test @@ -6,7 +6,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: macEmbed.test,v 1.7 2002/07/13 21:52:34 dgp Exp $ +# RCS: @(#) $Id: macEmbed.test,v 1.8 2002/07/14 05:48:46 dgp Exp $ package require tcltest 2.1 namespace import -force tcltest::configure @@ -33,7 +33,7 @@ test macEmbed-1.3 {TkpUseWindow procedure, creating Container records} {testembe toplevel .t -use $w list [testembed] [expr [lindex [lindex [testembed all] 1] 0] - $w] } {{{XXX .f2 {} {}} {XXX .f1 XXX .t}} 0} -test macEmbed-1.4 {TkpUseWindow procedure, creating Container records} {testembed macOnly} testembed { +test macEmbed-1.4 {TkpUseWindow procedure, creating Container records} {testembed macOnly} { deleteWindows frame .f1 -container 1 -width 200 -height 50 frame .f2 -container 1 -width 200 -height 50 |