summaryrefslogtreecommitdiffstats
path: root/tests/ttk
diff options
context:
space:
mode:
authorjenglish <jenglish@flightlab.com>2010-05-31 17:22:45 (GMT)
committerjenglish <jenglish@flightlab.com>2010-05-31 17:22:45 (GMT)
commitd4f6bf9607a4aa2a4d5b1493f34c9ced59547708 (patch)
tree59bd9e3610b6fe5043cd2906dba04f62551e9fa5 /tests/ttk
parent21254079488f4212f41c0c2b3acbe29e44bcae3d (diff)
downloadtk-d4f6bf9607a4aa2a4d5b1493f34c9ced59547708.zip
tk-d4f6bf9607a4aa2a4d5b1493f34c9ced59547708.tar.gz
tk-d4f6bf9607a4aa2a4d5b1493f34c9ced59547708.tar.bz2
Tk_CreateBinding: Silently ignore empty binding scripts (Fixes [Bug 3006842]).
ttkTreeview.c: [$tv tag bind $tag <...> {}] now removes binding.
Diffstat (limited to 'tests/ttk')
-rw-r--r--tests/ttk/treeview.test13
1 files changed, 12 insertions, 1 deletions
diff --git a/tests/ttk/treeview.test b/tests/ttk/treeview.test
index 46c3f6e..c97b27a 100644
--- a/tests/ttk/treeview.test
+++ b/tests/ttk/treeview.test
@@ -1,5 +1,5 @@
#
-# $Id: treeview.test,v 1.3.2.1 2008/08/19 14:48:00 jenglish Exp $
+# $Id: treeview.test,v 1.3.2.2 2010/05/31 17:22:49 jenglish Exp $
#
# [7Jun2005] TO CHECK: [$tv see {}] -- shouldn't work (at least, shouldn't do
# what it currently does)
@@ -488,4 +488,15 @@ test treeview-10.1 "Root node properly initialized (#1541739)" -setup {
destroy .tv
}
+test treeview-3006842 "Null bindings" -setup {
+ ttk::treeview .tv -show tree
+} -body {
+ .tv tag bind empty <ButtonPress-1> {}
+ .tv insert {} end -text "Click me" -tags empty
+ event generate .tv <ButtonPress-1> -x 10 -y 10
+ .tv tag bind empty
+} -result {} -cleanup {
+ destroy .tv
+}
+
tcltest::cleanupTests