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

Buttons 4 and 5.

Browse source
This commit is contained in:
rsc 2004-06-09 14:01:43 +00:00
parent ff8bbc7987
commit c16f1f733b
3 changed files with 24 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

12
src/cmd/acme/acme.c
View file

@ -536,6 +536,18 @@ mousethread(void *v)
}
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)