From 59b73712486121720aa582183db730964dc8c8a9 Mon Sep 17 00:00:00 2001
From: hobbs <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 <jeffh@ActiveState.com>
+
+ * library/ttk/panedwindow.tcl (ttk::panedwindow::Press): handle
+ Press triggering outside sash element boundaries.
+
2007-04-10 Joe English <jenglish@users.sourceforge.net>
* 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