diff options
author | fvogel <fvogelnew1@free.fr> | 2019-05-14 20:50:17 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2019-05-14 20:50:17 (GMT) |
commit | 344eb81cce308ca83c385ba7d980abee349bd88f (patch) | |
tree | 7cf735b00da489ede7f2058c66f6274a5b6cc760 /tests/ttk | |
parent | 24642adb7fd747df55fe668b2604fd26e319c76b (diff) | |
download | tk-344eb81cce308ca83c385ba7d980abee349bd88f.zip tk-344eb81cce308ca83c385ba7d980abee349bd88f.tar.gz tk-344eb81cce308ca83c385ba7d980abee349bd88f.tar.bz2 |
Add tests for <<TreeviewSelect>>. treeview-8.6 already passed ; treeview-8.7 passes in this bugfix branch only
Diffstat (limited to 'tests/ttk')
-rw-r--r-- | tests/ttk/treeview.test | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/tests/ttk/treeview.test b/tests/ttk/treeview.test index a36e3d1..ae15111 100644 --- a/tests/ttk/treeview.test +++ b/tests/ttk/treeview.test @@ -459,6 +459,27 @@ test treeview-8.5 "Selection - bad operation" -body { .tv selection badop foo } -returnCodes 1 -match glob -result {bad selection operation "badop": must be *} +test treeview-8.6 "Selection - <<TreeviewSelect>> on selection add" -body { + .tv selection set {} + bind .tv <<TreeviewSelect>> {set res 1} + set res 0 + .tv selection add newnode.n1 + update + set res +} -result {1} + +test treeview-8.7 "<<TreeviewSelect>> on item deletion" -body { + .tv selection set {} + .tv insert "" end -id doomed -text DeadItem + .tv selection add doomed + update + bind .tv <<TreeviewSelect>> {set res 1} + set res 0 + .tv delete doomed + update + set res +} -result {1} + ### NEED: more tests for see/yview/scrolling proc scrollcallback {args} { |