diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-19 09:02:56 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-19 09:02:56 (GMT) |
commit | 438c452e138ae039893d7b8274a637fca2168f78 (patch) | |
tree | f817d7fc68ef9905697cc7d3afcec0013c8f0514 /tests/ttk/notebook.test | |
parent | 112fdb000f8632e92519ab4842b0ff340aec52ab (diff) | |
parent | 37279b8ec55cb993d441216c9b90e5668146e4c7 (diff) | |
download | tk-438c452e138ae039893d7b8274a637fca2168f78.zip tk-438c452e138ae039893d7b8274a637fca2168f78.tar.gz tk-438c452e138ae039893d7b8274a637fca2168f78.tar.bz2 |
Merge 8.7
Diffstat (limited to 'tests/ttk/notebook.test')
-rw-r--r-- | tests/ttk/notebook.test | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/ttk/notebook.test b/tests/ttk/notebook.test index 50047cf..8c2e186 100644 --- a/tests/ttk/notebook.test +++ b/tests/ttk/notebook.test @@ -512,4 +512,18 @@ test notebook-1343984-2 "don't autoselect on destroy" -body { set ::history } -result [list DESTROY .nb.frame1 DESTROY .nb.frame2 DESTROY .nb.frame3] +test notebook-8.1 "style command" -body { + ttk::notebook .w + list [.w cget -style] [.w style] [winfo class .w] +} -cleanup { + destroy .w +} -result {{} TNotebook TNotebook} +test notebook-8.2 "style command" -body { + ttk::style configure customStyle.TNotebook + ttk::notebook .w -style customStyle.TNotebook + list [.w cget -style] [.w style] [winfo class .w] +} -cleanup { + destroy .w +} -result {customStyle.TNotebook customStyle.TNotebook TNotebook} + tcltest::cleanupTests |