From 59b73712486121720aa582183db730964dc8c8a9 Mon Sep 17 00:00:00 2001 From: hobbs Date: Fri, 13 Apr 2007 00:21:47 +0000 Subject: * library/ttk/panedwindow.tcl (ttk::panedwindow::Press): handle Press triggering outside sash element boundaries. --- ChangeLog | 5 +++++ library/ttk/panedwindow.tcl | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index ee48f99..573695a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2007-04-12 Jeff Hobbs + + * library/ttk/panedwindow.tcl (ttk::panedwindow::Press): handle + Press triggering outside sash element boundaries. + 2007-04-10 Joe English * win/ttkWinMonitor.c, win/ttkWinXPTheme.c: Re-sync diff --git a/library/ttk/panedwindow.tcl b/library/ttk/panedwindow.tcl index e575e8a..15ec4f8 100644 --- a/library/ttk/panedwindow.tcl +++ b/library/ttk/panedwindow.tcl @@ -1,5 +1,5 @@ # -# $Id: panedwindow.tcl,v 1.2 2006/11/07 03:45:28 jenglish Exp $ +# $Id: panedwindow.tcl,v 1.3 2007/04/13 00:21:47 hobbs Exp $ # # Bindings for ttk::panedwindow widget. # @@ -34,7 +34,7 @@ proc ttk::panedwindow::Press {w x y} { variable State lassign [$w identify $x $y] sash element - if {![info exists sash]} { + if {![info exists sash] || $sash eq ""} { set State(pressed) 0 return } -- cgit v0.12