xfnw/plan9fox
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

acme: reverting scroll change, causes continuous scrolling with scrollwheel

Browse source
This commit is contained in:
cinap_lenrek 2020-08-03 21:51:25 +02:00
parent 57362e0c8c
commit 053a6526e2
2 changed files with 15 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
sys/src/cmd/acme/acme.c
View file

@ -513,13 +513,8 @@ mousethread(void *)
but = 2;
else if(m.buttons == 4)
but = 3;
else if(m.buttons == 8)
but = 4;
else if(m.buttons == 16)
but = 5;
barttext = t;
if(t->what==Body && w != nil
&& (ptinrect(m.xy, t->scrollr) || (m.buttons & (8|16)))){
if(t->what==Body && ptinrect(m.xy, t->scrollr)){
if(but){
winlock(w, 'M');
t->eq0 = ~0;
@ -528,6 +523,18 @@ mousethread(void *)
}
goto Continue;
}
/* scroll buttons, wheels, etc. */
if(t->what==Body && w != nil && (m.buttons & (8|16))){
if(m.buttons & 8)
but = Kscrolloneup;
else
but = Kscrollonedown;
winlock(w, 'M');
t->eq0 = ~0;
texttype(t, but);
winunlock(w);
goto Continue;
}
if(ptinrect(m.xy, t->scrollr)){
if(but){
if(t->what == Columntag)

4
sys/src/cmd/acme/scrl.c
View file

@ -132,7 +132,7 @@ textscroll(Text *t, int but)
readmouse(mousectl);
continue;
}
if(but == 1 || but == 4)
if(but == 1)
p0 = textbacknl(t, t->org, (my-s.min.y)/t->font->height);
else
p0 = t->org+frcharofpt(t, Pt(s.max.x, my));
@ -140,7 +140,7 @@ textscroll(Text *t, int but)
textsetorigin(t, p0, TRUE);
oldp0 = p0;
/* debounce */
if(first && but < 4){
if(first){
flushimage(display, 1);
sleep(200);
nbrecv(mousectl->c, &mousectl->Mouse);