Commit 8aac4a7b authored by Ivica Bukvic's avatar Ivica Bukvic
Browse files

hopefully fixed the scrolling algorithm once and for all (don't hold your breath)

parent 633035bf
......@@ -3579,8 +3579,8 @@ proc pdtk_canvas_getscroll {name} {
set ::xscrollable($parentname) 0
pack forget $parentname.scrollvert
set ::yscrollable($parentname) 0
set winwidth [expr {$winwidth + 14}]
set winheight [expr {$winheight + 14}]
#set winwidth [expr {$winwidth + 14}]
#set winheight [expr {$winheight + 14}]
}
if {$winwidth >= $canvaswidth && $::xscrollable($parentname)} {
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment