diff options
| author | jenglish <jenglish@noemail.net> | 2008-01-30 05:33:17 (GMT) |
|---|---|---|
| committer | jenglish <jenglish@noemail.net> | 2008-01-30 05:33:17 (GMT) |
| commit | c704523ec5874e95718fd0b782b886fe23ce4511 (patch) | |
| tree | a2d8e9c3052aeb6c17e9125c77ad89ab7cd84567 /library | |
| parent | 8418c1eebc365eeec56a8a0dd379c0fa0baafa31 (diff) | |
| download | tk-c704523ec5874e95718fd0b782b886fe23ce4511.zip tk-c704523ec5874e95718fd0b782b886fe23ce4511.tar.gz tk-c704523ec5874e95718fd0b782b886fe23ce4511.tar.bz2 | |
library/treeview.tcl: Fix bug in Shift-ButtonPress-1 binding
(error if no current focus item; reported on c.l.t.)
FossilOrigin-Name: 98fbd097477afebff9bb3da7d43ae06374e7698a
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 } } |