summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--library/ttk/treeview.tcl4
2 files changed, 7 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 920f88b..2a6f4c6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-04-25 Joe English <jenglish@users.sourceforge.net>
+
+ * library/ttk/treeview.tcl: BUGFIX: [$tv selection] takes
+ a list of items, not a single item [Bug 1951733].
+
2008-04-20 Pat Thoyts <patthoyts@users.sourceforge.net>
* win/makefile.vc: Include ws2_32 in the link list [Bug 1900872]
diff --git a/library/ttk/treeview.tcl b/library/ttk/treeview.tcl
index 473e21b..d2a1015 100644
--- a/library/ttk/treeview.tcl
+++ b/library/ttk/treeview.tcl
@@ -1,4 +1,4 @@
-# $Id: treeview.tcl,v 1.4 2008/01/30 05:33:19 jenglish Exp $
+# $Id: treeview.tcl,v 1.5 2008/04/25 19:08:32 jenglish Exp $
#
# ttk::treeview widget bindings and utilities.
#
@@ -280,7 +280,7 @@ proc ttk::treeview::select.choose.extended {w item} {
BrowseTo $w $item
}
proc ttk::treeview::select.toggle.extended {w item} {
- $w selection toggle $item
+ $w selection toggle [list $item]
}
proc ttk::treeview::select.extend.extended {w item} {
if {[set anchor [$w focus]] ne ""} {