* [9front] [PATCH] mothra: enable mousewheel scrolling in history list
@ 2022-04-06 15:29 phil9
0 siblings, 0 replies; only message in thread
From: phil9 @ 2022-04-06 15:29 UTC (permalink / raw)
To: 9front
In the history list, scrolling was only possible using the scrollbar
but not the mousewheel like in the text panel.
---
diff 909205036de4762628fdcdd295e209309817a604 887366a22c1bc50c238668af61664112259a4365
--- a/sys/src/cmd/mothra/mothra.c Tue Apr 5 01:09:49 2022
+++ b/sys/src/cmd/mothra/mothra.c Wed Apr 6 17:29:41 2022
@@ -140,11 +140,11 @@
return 0;
}
-void scrolltext(int dy, int whence)
+void scrollpanel(Panel *p, int dy, int whence)
{
Scroll s;
- s = plgetscroll(text);
+ s = plgetscroll(p);
switch(whence){
case 0:
s.pos.y = dy;
@@ -160,7 +160,7 @@
s.pos.y = s.size.y;
if(s.pos.y < 0)
s.pos.y = 0;
- plsetscroll(text, s);
+ plsetscroll(p, s);
}
void sidescroll(int dx, int whence)
@@ -404,22 +404,22 @@
plkeyboard(e.kbdc);
break;
case Khome:
- scrolltext(0, 0);
+ scrollpanel(text, 0, 0);
break;
case Kup:
- scrolltext(-text->size.y/4, 1);
+ scrollpanel(text, -text->size.y/4, 1);
break;
case Kpgup:
- scrolltext(-text->size.y/2, 1);
+ scrollpanel(text, -text->size.y/2, 1);
break;
case Kdown:
- scrolltext(text->size.y/4, 1);
+ scrollpanel(text, text->size.y/4, 1);
break;
case Kpgdown:
- scrolltext(text->size.y/2, 1);
+ scrollpanel(text, text->size.y/2, 1);
break;
case Kend:
- scrolltext(-text->size.y, 2);
+ scrollpanel(text, -text->size.y, 2);
break;
case Kack:
search();
@@ -438,11 +438,18 @@
break;
case Emouse:
mouse=e.mouse;
+ if(mouse.buttons & (8|16) && ptinrect(mouse.xy, list->r) && defdisplay){
+ if(mouse.buttons & 8)
+ scrollpanel(list, list->r.min.y - mouse.xy.y, 1);
+ else
+ scrollpanel(list, mouse.xy.y - list->r.min.y, 1);
+ break;
+ }
if(mouse.buttons & (8|16) && ptinrect(mouse.xy, text->r)){
if(mouse.buttons & 8)
- scrolltext(text->r.min.y - mouse.xy.y, 1);
+ scrollpanel(text, text->r.min.y - mouse.xy.y, 1);
else
- scrolltext(mouse.xy.y - text->r.min.y, 1);
+ scrollpanel(text, mouse.xy.y - text->r.min.y, 1);
break;
}
plmouse(root, &mouse);
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2022-04-06 17:12 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-04-06 15:29 [9front] [PATCH] mothra: enable mousewheel scrolling in history list phil9
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).