diff options
author | treectrl <treectrl> | 2006-11-15 23:54:10 (GMT) |
---|---|---|
committer | treectrl <treectrl> | 2006-11-15 23:54:10 (GMT) |
commit | 532f6309c4691724594d13aa3abb6311672d886a (patch) | |
tree | 4802a13e33b226ded5fa6f27f5e175022d065b03 /library/treectrl.tcl | |
parent | b85025fe97712d77ccfd2fe88a582b707bedbe72 (diff) | |
download | tktreectrl-532f6309c4691724594d13aa3abb6311672d886a.zip tktreectrl-532f6309c4691724594d13aa3abb6311672d886a.tar.gz tktreectrl-532f6309c4691724594d13aa3abb6311672d886a.tar.bz2 |
Fixed a bug where the right-most column could be resized even when its -resize option was false.
Diffstat (limited to 'library/treectrl.tcl')
-rw-r--r-- | library/treectrl.tcl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/library/treectrl.tcl b/library/treectrl.tcl index 2e5b1ce..30f3de9 100644 --- a/library/treectrl.tcl +++ b/library/treectrl.tcl @@ -1,4 +1,4 @@ -# RCS: @(#) $Id: treectrl.tcl,v 1.32 2006/11/10 23:02:55 treectrl Exp $ +# RCS: @(#) $Id: treectrl.tcl,v 1.33 2006/11/15 23:54:10 treectrl Exp $ bind TreeCtrl <Motion> { TreeCtrl::CursorCheck %W %x %y @@ -261,7 +261,7 @@ proc ::TreeCtrl::CursorAction {w x y} { if {$side eq "left"} { if {[$w column compare $column == tail]} { set column [$w column id "last visible lock none"] - if {$column ne ""} { + if {$column ne "" && [$w column cget $column -resize]} { return "column resize $column" } # Can't -resize or -button the tail column @@ -498,7 +498,6 @@ proc ::TreeCtrl::ButtonPress1 {w x y} { proc ::TreeCtrl::DoubleButton1 {w x y} { - set id [$w identify $x $y] if {$id eq ""} { return |