diff options
| author | dgp <dgp@users.sourceforge.net> | 2007-05-26 04:06:05 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2007-05-26 04:06:05 (GMT) |
| commit | 095cd3280ca77a1c44f4ee014fdce3f751c26817 (patch) | |
| tree | 33e1d7978650c468362078ea9384172951a436ff /tests | |
| parent | f4fe8efadbec59f3eaf14ca523b2c05fc7d21759 (diff) | |
| download | tk-095cd3280ca77a1c44f4ee014fdce3f751c26817.zip tk-095cd3280ca77a1c44f4ee014fdce3f751c26817.tar.gz tk-095cd3280ca77a1c44f4ee014fdce3f751c26817.tar.bz2 | |
merge updates from HEAD
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/ttk/misc.test | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/tests/ttk/misc.test b/tests/ttk/misc.test deleted file mode 100644 index 27b87d6..0000000 --- a/tests/ttk/misc.test +++ /dev/null @@ -1,33 +0,0 @@ -# -# $Id: misc.test,v 1.1 2006/10/31 01:42:27 hobbs Exp $ -# - -package require Tk 8.5 -package require tcltest ; namespace import -force tcltest::* -loadTestedCommands - -test misc-1.0 "#1551500 -parent option in ttk::dialog doesn't work" -body { - ttk::dialog .dialog -parent . -type ok \ - -message "Something to say" -title "Let's see" - wm transient .dialog -} -result . -cleanup { destroy .dialog } - -test misc-1.1 "ttk::dialog w/no -parent option" -body { - toplevel .t - ttk::dialog .t.dialog -type ok - wm transient .t.dialog -} -result .t -cleanup { destroy .t } - -test misc-1.2 "Explicitly specify -parent" -body { - toplevel .t - ttk::dialog .t.dialog -type ok -parent . - wm transient .t.dialog -} -result . -cleanup { destroy .t } - -test misc-1.3 "Nontransient dialog" -body { - toplevel .t - ttk::dialog .t.dialog -type ok -parent "" - wm transient .t.dialog -} -result "" -cleanup { destroy .t } - -tcltest::cleanupTests |