diff options
author | jenglish@flightlab.com <jenglish> | 2008-01-30 05:33:18 (GMT) |
---|---|---|
committer | jenglish@flightlab.com <jenglish> | 2008-01-30 05:33:18 (GMT) |
commit | accdaeff0eff6736a1312d765c38b01642d50f39 (patch) | |
tree | a2d8e9c3052aeb6c17e9125c77ad89ab7cd84567 /library | |
parent | 07cb2d0ca40194c9bfcbf1f6076bd46e3dfb0f43 (diff) | |
download | tk-accdaeff0eff6736a1312d765c38b01642d50f39.zip tk-accdaeff0eff6736a1312d765c38b01642d50f39.tar.gz tk-accdaeff0eff6736a1312d765c38b01642d50f39.tar.bz2 |
library/treeview.tcl: Fix bug in Shift-ButtonPress-1 binding
(error if no current focus item; reported on c.l.t.)
Diffstat (limited to 'library')
-rw-r--r-- | library/ttk/treeview.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/ttk/treeview.tcl b/library/ttk/treeview.tcl index a5ebcb2..473e21b 100644 --- a/library/ttk/treeview.tcl +++ b/library/ttk/treeview.tcl @@ -1,4 +1,4 @@ -# $Id: treeview.tcl,v 1.3 2008/01/06 19:16:12 jenglish Exp $ +# $Id: treeview.tcl,v 1.4 2008/01/30 05:33:19 jenglish Exp $ # # ttk::treeview widget bindings and utilities. # @@ -286,7 +286,7 @@ proc ttk::treeview::select.extend.extended {w item} { if {[set anchor [$w focus]] ne ""} { $w selection set [between $w $anchor $item] } else { - BrowseTo $item + BrowseTo $w $item } } |