diff --git a/pd/src/pd.tk b/pd/src/pd.tk index 8719d42cb0f3be7665b835414e18e1bb48cac59f..edf0c79bcddeb892fa50c65b2c5b70dd457f5830 100644 --- a/pd/src/pd.tk +++ b/pd/src/pd.tk @@ -3676,17 +3676,17 @@ proc pdtk_canvas_getscroll {name} { if {$::scroll($parentname) == 1} { - if {($::xscrollable($parentname) && $::yscrollable($parentname) - && [expr $winwidth + 14] >= $canvaswidth - && [expr $winheight + 14] >= $canvasheight)} { - #puts stderr "TRYING TO ADJUST WIDTH & HEIGHT" - pack forget $parentname.scrollhort - set ::xscrollable($parentname) 0 - pack forget $parentname.scrollvert - set ::yscrollable($parentname) 0 - set winwidth [expr {$winwidth + 14}] - set winheight [expr {$winheight + 14}] - } + #if {($::xscrollable($parentname) && $::yscrollable($parentname) + # && [expr $winwidth + 14] >= $canvaswidth + # && [expr $winheight + 14] >= $canvasheight)} { + # #puts stderr "TRYING TO ADJUST WIDTH & HEIGHT" + # pack forget $parentname.scrollhort + # set ::xscrollable($parentname) 0 + # pack forget $parentname.scrollvert + # set ::yscrollable($parentname) 0 + # set winwidth [expr {$winwidth + 14}] + # set winheight [expr {$winheight + 14}] + #} if {$winwidth >= $canvaswidth && $::xscrollable($parentname)} { #puts stderr "NO HORIZONTAL NECESSARY"