rio: fix scrolling when cursor is above window

This commit is contained in:
BurnZeZ 2015-10-24 22:57:07 -04:00
parent 847f3a0cf5
commit 8f27b8d04d

View file

@ -153,10 +153,13 @@ wscroll(Window *w, int but)
readmouse(&w->mc); readmouse(&w->mc);
continue; continue;
} }
if(but == 1 || but == 4) if(but == 1 || but == 4){
p0 = wbacknl(w, w->org, (my-s.min.y)/w->font->height); y = max(1, (my-s.min.y)/w->font->height);
else p0 = wbacknl(w, w->org, y);
p0 = w->org+frcharofpt(w, Pt(s.max.x, my)); }else{
y = max(my, s.min.y+w->font->height);
p0 = w->org+frcharofpt(w, Pt(s.max.x, y));
}
if(oldp0 != p0) if(oldp0 != p0)
wsetorigin(w, p0, TRUE); wsetorigin(w, p0, TRUE);
oldp0 = p0; oldp0 = p0;