diff options
author | fvogel <fvogelnew1@free.fr> | 2022-12-04 14:53:25 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2022-12-04 14:53:25 (GMT) |
commit | 430630c01b873ebc42753a45703bcf4f98d888f8 (patch) | |
tree | da20600a686c63e628f633c680aead87dc402524 /tests/ttk | |
parent | 3a31986d672551abbc485259ec9daf30dec42828 (diff) | |
download | tk-430630c01b873ebc42753a45703bcf4f98d888f8.zip tk-430630c01b873ebc42753a45703bcf4f98d888f8.tar.gz tk-430630c01b873ebc42753a45703bcf4f98d888f8.tar.bz2 |
Add details in treeview.test.
Diffstat (limited to 'tests/ttk')
-rw-r--r-- | tests/ttk/treeview.test | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/tests/ttk/treeview.test b/tests/ttk/treeview.test index cf03b01..9fef708 100644 --- a/tests/ttk/treeview.test +++ b/tests/ttk/treeview.test @@ -52,16 +52,16 @@ proc tvSetup {} { } proc tvSetupWithItems {} { tvSetup - .tv insert {} end -id nn - .tv insert nn end -id nn.n1 - .tv insert nn end -id nn.n2 - .tv insert nn end -id nn.n3 + .tv insert {} end -id nn -text "nn" + .tv insert nn end -id nn.n1 -text "nn.1" + .tv insert nn end -id nn.n2 -text "nn.3" + .tv insert nn end -id nn.n3 -text "nn.3" for {set t 2} {$t < 100} {incr t} { - .tv insert {} end -id nn$t + .tv insert {} end -id nn$t -text "nn$t" if {$t % 3 == 0} { - .tv insert nn$t end -id nn$t.n1 - .tv insert nn$t end -id nn$t.n2 - .tv insert nn$t end -id nn$t.n3 + .tv insert nn$t end -id nn$t.n1 -text "nn$t.n1" + .tv insert nn$t end -id nn$t.n2 -text "nn$t.n2" + .tv insert nn$t end -id nn$t.n3 -text "nn$t.n3" } } } @@ -1181,7 +1181,7 @@ test treeview-rowheight-4 "rowheight adapts to item padding" -constraints failsO update set after [lindex [.tv bbox nn a] 3] set diff [expr {$after - $baseline}] -} -result 4 +} -result [expr {3-2 + 5-2}] test treeview-rowheight-5 "rowheight adapts to cell padding" -constraints failsOnUbuntuNoXft -body { # Test that things from Cell style is picked up. @@ -1192,7 +1192,7 @@ test treeview-rowheight-5 "rowheight adapts to cell padding" -constraints failsO update set after [lindex [.tv bbox nn a] 3] set diff [expr {$after - $baseline}] -} -result 7 +} -result [expr {8-5 + 9-5}] ### NEED: tests for focus item, selection |