diff options
author | jenglish <jenglish@flightlab.com> | 2007-06-09 21:45:44 (GMT) |
---|---|---|
committer | jenglish <jenglish@flightlab.com> | 2007-06-09 21:45:44 (GMT) |
commit | fcd7a3968daa37ea2184e281645832703b9b541a (patch) | |
tree | 6ff8505955c590dbaef7689b5a4e271b4e3a3ae3 /tests/ttk/panedwindow.test | |
parent | 00da9d704110e07f22779330047d0b99406dd2ce (diff) | |
download | tk-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 'tests/ttk/panedwindow.test')
-rw-r--r-- | tests/ttk/panedwindow.test | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/ttk/panedwindow.test b/tests/ttk/panedwindow.test index 190e6b5..47764a2 100644 --- a/tests/ttk/panedwindow.test +++ b/tests/ttk/panedwindow.test @@ -1,5 +1,5 @@ # -# $Id: panedwindow.test,v 1.2 2006/11/07 03:45:28 jenglish Exp $ +# $Id: panedwindow.test,v 1.3 2007/06/09 21:45:45 jenglish Exp $ # package require Tk 8.5 @@ -156,10 +156,11 @@ test panedwindow-4.2 "forget forgotten" -body { # proc checkorder {winlist} { set pos -1 + set positions [list] foreach win $winlist { - set nextpos [winfo y $win] + lappend positions [set nextpos [winfo y $win]] if {$nextpos <= $pos} { - error "window $win out of order" + error "window $win out of order ($positions)" } set pos $nextpos } |