o5r/plan9port
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

better scrolling

Browse source
This commit is contained in:
rsc 2005-03-18 19:33:26 +00:00
parent 4b12db1171
commit f334d75632
2 changed files with 37 additions and 41 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/cmd/acme/cols.c
View file

@ -541,6 +541,9 @@ colwhich(Column *c, Point p)
return &w->tag;
return &w->body;
}
/* scrollr drops below w->r on low windows */
if(ptinrect(p, w->body.scrollr))
return &w->body;
}
return nil;
}

13
src/cmd/acme/scrl.c
View file

@ -117,9 +117,6 @@ textscroll(Text *t, int but)
first = TRUE;
do{
flushimage(display, 1);
if(mouse->xy.x<s.min.x || s.max.x<=mouse->xy.x){
readmouse(mousectl);
}else{
my = mouse->xy.y;
if(my < s.min.y)
my = s.min.y;
@ -131,12 +128,9 @@ textscroll(Text *t, int but)
}
if(but == 2){
y = my;
if(y > s.max.y-2)
y = s.max.y-2;
if(t->file->b.nc > 1024*1024)
p0 = ((t->file->b.nc>>10)*(y-s.min.y)/h)<<10;
else
p0 = t->file->b.nc*(y-s.min.y)/h;
p0 = (vlong)t->file->b.nc*(y-s.min.y)/h;
if(p0 >= t->q1)
p0 = textbacknl(t, p0, 2);
if(oldp0 != p0)
textsetorigin(t, p0, FALSE);
oldp0 = p0;
@ -158,7 +152,6 @@ textscroll(Text *t, int but)
first = FALSE;
}
scrsleep(80);
}
}while(mouse->buttons & (1<<(but-1)));
while(mouse->buttons)
readmouse(mousectl);