diff options
author | jenglish <jenglish@noemail.net> | 2007-05-25 22:38:53 (GMT) |
---|---|---|
committer | jenglish <jenglish@noemail.net> | 2007-05-25 22:38:53 (GMT) |
commit | d06d37cd26c9e18eaa1a81ae2ec65e9af6806e9d (patch) | |
tree | cf4e484b697c93d02e7471f46999254a8a29ecb1 /tests/ttk | |
parent | b93dae209fb628f8aad764b96cc452e0a3468cd0 (diff) | |
download | tk-d06d37cd26c9e18eaa1a81ae2ec65e9af6806e9d.zip tk-d06d37cd26c9e18eaa1a81ae2ec65e9af6806e9d.tar.gz tk-d06d37cd26c9e18eaa1a81ae2ec65e9af6806e9d.tar.bz2 |
Removed tk/tests/ttk/misc.test -- ttk::dialog tests, not appropriate for core.
FossilOrigin-Name: d95fb3b57e6bd123a5eb1c2cb7682d37b76835a7
Diffstat (limited to 'tests/ttk')
-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 |