summaryrefslogtreecommitdiffstats
path: root/library/ttk/panedwindow.tcl
diff options
context:
space:
mode:
authorjenglish <jenglish@flightlab.com>2007-06-09 21:45:44 (GMT)
committerjenglish <jenglish@flightlab.com>2007-06-09 21:45:44 (GMT)
commitfcd7a3968daa37ea2184e281645832703b9b541a (patch)
tree6ff8505955c590dbaef7689b5a4e271b4e3a3ae3 /library/ttk/panedwindow.tcl
parent00da9d704110e07f22779330047d0b99406dd2ce (diff)
downloadtk-fcd7a3968daa37ea2184e281645832703b9b541a.zip
tk-fcd7a3968daa37ea2184e281645832703b9b541a.tar.gz
tk-fcd7a3968daa37ea2184e281645832703b9b541a.tar.bz2
Ttk_Manager API overhaul:
+ Ttk_Manager no longer responsible for managing slave records + Ttk_Manager structure now opaque + Ttk_Slave structure now private + Pass Ttk_Manager * to Tk_GeomMgr hooks instead of Ttk_Slave * ttk::labelframe: Simplified -labelwidget management. ttk::noteboook 'insert' command didn't correctly maintain current tab. Changed documentation of ttk::panedwindow 'identify' command to match implementation.
Diffstat (limited to 'library/ttk/panedwindow.tcl')
-rw-r--r--library/ttk/panedwindow.tcl6
1 files changed, 3 insertions, 3 deletions
diff --git a/library/ttk/panedwindow.tcl b/library/ttk/panedwindow.tcl
index 15ec4f8..9cb046d 100644
--- a/library/ttk/panedwindow.tcl
+++ b/library/ttk/panedwindow.tcl
@@ -1,5 +1,5 @@
#
-# $Id: panedwindow.tcl,v 1.3 2007/04/13 00:21:47 hobbs Exp $
+# $Id: panedwindow.tcl,v 1.4 2007/06/09 21:45:45 jenglish Exp $
#
# Bindings for ttk::panedwindow widget.
#
@@ -33,8 +33,8 @@ bind TPanedwindow <<EnteredChild>> { ttk::panedwindow::ResetCursor %W }
proc ttk::panedwindow::Press {w x y} {
variable State
- lassign [$w identify $x $y] sash element
- if {![info exists sash] || $sash eq ""} {
+ set sash [$w identify $x $y]
+ if {$sash eq ""} {
set State(pressed) 0
return
}