@@ -2955,9 +2955,9 @@ proc savestuff {w} {
2955
2955
proc resizeclistpanes {win w} {
2956
2956
global oldwidth oldsash use_ttk
2957
2957
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]
2961
2961
} elseif {$use_ttk } {
2962
2962
set s0 [$win sashpos 0]
2963
2963
set s1 [$win sashpos 1]
@@ -2992,16 +2992,16 @@ proc resizeclistpanes {win w} {
2992
2992
$win sash place 0 $sash0 [lindex $s0 1]
2993
2993
$win sash place 1 $sash1 [lindex $s1 1]
2994
2994
}
2995
- set oldsash($win ) [list $sash0 $sash1 ]
2995
+ set oldsash($win ) [list $sash0 $sash1 ]
2996
2996
}
2997
2997
set oldwidth($win ) $w
2998
2998
}
2999
2999
3000
3000
proc resizecdetpanes {win w} {
3001
3001
global oldwidth oldsash use_ttk
3002
3002
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)
3005
3005
} elseif {$use_ttk } {
3006
3006
set s0 [$win sashpos 0]
3007
3007
} else {
@@ -3024,7 +3024,7 @@ proc resizecdetpanes {win w} {
3024
3024
} else {
3025
3025
$win sash place 0 $sash0 [lindex $s0 1]
3026
3026
}
3027
- set oldsash($win ) $sash0
3027
+ set oldsash($win ) $sash0
3028
3028
}
3029
3029
set oldwidth($win ) $w
3030
3030
}
0 commit comments