Commit 53a0e971 authored by Ivica Bukvic's avatar Ivica Bukvic
Browse files

added pdtk_canvas_force_getscroll function to ensure critical getscroll events...

added pdtk_canvas_force_getscroll function to ensure critical getscroll events are executed immediately
parent f58f03c0
......@@ -793,7 +793,7 @@ void canvas_map(t_canvas *x, t_floatarg f)
canvas_drawlines(x);
if (x->gl_isgraph && x->gl_goprect)
canvas_drawredrect(x, 1);
sys_vgui("pdtk_canvas_getscroll .x%lx.c\n", x);
sys_vgui("pdtk_canvas_force_getscroll .x%lx.c\n", x);
//}
}
else
......@@ -1027,7 +1027,7 @@ static void canvas_pop(t_canvas *x, t_floatarg fvis)
canvas_resortinlets(x);
canvas_resortoutlets(x);
x->gl_loading = 0;
sys_vgui("pdtk_canvas_getscroll .x%lx.c\n", x);
sys_vgui("pdtk_canvas_force_getscroll .x%lx.c\n", x);
//fprintf(stderr,"loading = 0 .x%lx owner=.x%lx\n", x, x->gl_owner);
}
......
......@@ -3671,6 +3671,11 @@ proc pdtk_canvas_getscroll_configure {canvas} {
}
}
proc pdtk_canvas_force_getscroll {name} {
set ::update_tick([winfo parent $name]) 0
pdtk_canvas_getscroll $name
}
proc pdtk_canvas_getscroll {name} {
global pd_nt
global pdtk_canvas_mouseup_name
......
Markdown is supported
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