From 8f27b8d04dfb40d396fc6499fda4bcc2a9a13d42 Mon Sep 17 00:00:00 2001 From: BurnZeZ Date: Sat, 24 Oct 2015 22:57:07 -0400 Subject: rio: fix scrolling when cursor is above window --- sys/src/cmd/rio/scrl.c | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/sys/src/cmd/rio/scrl.c b/sys/src/cmd/rio/scrl.c index de0257538..c8e6acf7c 100644 --- a/sys/src/cmd/rio/scrl.c +++ b/sys/src/cmd/rio/scrl.c @@ -153,10 +153,13 @@ wscroll(Window *w, int but) readmouse(&w->mc); continue; } - if(but == 1 || but == 4) - p0 = wbacknl(w, w->org, (my-s.min.y)/w->font->height); - else - p0 = w->org+frcharofpt(w, Pt(s.max.x, my)); + if(but == 1 || but == 4){ + y = max(1, (my-s.min.y)/w->font->height); + p0 = wbacknl(w, w->org, y); + }else{ + y = max(my, s.min.y+w->font->height); + p0 = w->org+frcharofpt(w, Pt(s.max.x, y)); + } if(oldp0 != p0) wsetorigin(w, p0, TRUE); oldp0 = p0; -- cgit v1.2.3