@@ -2955,9 +2955,9 @@ proc savestuff {w} {
29552955proc resizeclistpanes {win w} {
29562956 global oldwidth oldsash use_ttk
29572957 if {[info exists oldwidth($win )]} {
2958- if {[info exists oldsash($win )]} {
2959- set s0 [lindex $oldsash($win) 0]
2960- set s1 [lindex $oldsash($win) 1]
2958+ if {[info exists oldsash($win )]} {
2959+ set s0 [lindex $oldsash($win) 0]
2960+ set s1 [lindex $oldsash($win) 1]
29612961 } elseif {$use_ttk } {
29622962 set s0 [$win sashpos 0]
29632963 set s1 [$win sashpos 1]
@@ -2992,16 +2992,16 @@ proc resizeclistpanes {win w} {
29922992 $win sash place 0 $sash0 [lindex $s0 1]
29932993 $win sash place 1 $sash1 [lindex $s1 1]
29942994 }
2995- set oldsash($win ) [list $sash0 $sash1 ]
2995+ set oldsash($win ) [list $sash0 $sash1 ]
29962996 }
29972997 set oldwidth($win ) $w
29982998}
29992999
30003000proc resizecdetpanes {win w} {
30013001 global oldwidth oldsash use_ttk
30023002 if {[info exists oldwidth($win )]} {
3003- if {[info exists oldsash($win )]} {
3004- set s0 $oldsash($win)
3003+ if {[info exists oldsash($win )]} {
3004+ set s0 $oldsash($win)
30053005 } elseif {$use_ttk } {
30063006 set s0 [$win sashpos 0]
30073007 } else {
@@ -3024,7 +3024,7 @@ proc resizecdetpanes {win w} {
30243024 } else {
30253025 $win sash place 0 $sash0 [lindex $s0 1]
30263026 }
3027- set oldsash($win ) $sash0
3027+ set oldsash($win ) $sash0
30283028 }
30293029 set oldwidth($win ) $w
30303030}
0 commit comments