From f7afa1ba0d7fbb85d203be9ec72126245052268e Mon Sep 17 00:00:00 2001 From: treectrl Date: Sat, 16 Sep 2006 20:31:05 +0000 Subject: Clicking in a disabled item starts the marquee drag. --- library/filelist-bindings.tcl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/library/filelist-bindings.tcl b/library/filelist-bindings.tcl index 573e59d..468feff 100644 --- a/library/filelist-bindings.tcl +++ b/library/filelist-bindings.tcl @@ -1,4 +1,4 @@ -# RCS: @(#) $Id: filelist-bindings.tcl,v 1.21 2006/09/05 21:57:21 treectrl Exp $ +# RCS: @(#) $Id: filelist-bindings.tcl,v 1.22 2006/09/16 20:31:05 treectrl Exp $ bind TreeCtrlFileList { TreeCtrl::FileListEditCancel %W @@ -126,6 +126,9 @@ proc ::TreeCtrl::FileListButton1 {T x y} { break } } + if {![$T item enabled $item]} { + set ok 0 + } if {$ok} { set Priv(drag,motion) 0 set Priv(drag,click,x) $x -- cgit v0.12