tadd -r flag to reverse scrolling behavior. from peter canning. - plan9port - [fork] Plan 9 from user space
HTML git clone git://src.adamsgaard.dk/plan9port
DIR Log
DIR Files
DIR Refs
DIR README
DIR LICENSE
---
DIR commit d8c78a8d560420c0f3996ed264098c6d26a27ac5
DIR parent 5eead98e71ca5d7df5797fc04371848e6ae04f4f
HTML Author: rsc <devnull@localhost>
Date: Mon, 10 Jan 2005 00:21:13 +0000
add -r flag to reverse scrolling behavior.
from peter canning.
Diffstat:
M src/cmd/acme/acme.c | 10 ++++++++++
M src/cmd/acme/dat.h | 1 +
2 files changed, 11 insertions(+), 0 deletions(-)
---
DIR diff --git a/src/cmd/acme/acme.c b/src/cmd/acme/acme.c
t@@ -27,6 +27,7 @@ char wdir[512] = ".";
Reffont *reffonts[2];
int snarffd = -1;
int mainpid;
+int swapscrollbuttons = FALSE;
enum{
NSnarf = 1000 /* less than 1024, I/O buffer size */
t@@ -102,6 +103,9 @@ threadmain(int argc, char *argv[])
if(loadfile == nil)
goto Usage;
break;
+ case 'r':
+ swapscrollbuttons = TRUE;
+ break;
case 'W':
winsize = ARGF();
if(winsize == nil)
t@@ -562,6 +566,12 @@ mousethread(void *v)
barttext = t;
if(t->what==Body && ptinrect(m.xy, t->scrollr)){
if(but){
+ if(swapscrollbuttons){
+ if(but == 1)
+ but = 3;
+ else if(but == 3)
+ but = 1;
+ }
winlock(w, 'M');
t->eq0 = ~0;
textscroll(t, but);
DIR diff --git a/src/cmd/acme/dat.h b/src/cmd/acme/dat.h
t@@ -515,6 +515,7 @@ Text *mousetext; /* global because Text.close needs to clear it */
Text *typetext; /* global because Text.close needs to clear it */
Text *barttext; /* shared between mousetask and keyboardthread */
int bartflag;
+int swapscrollbuttons;
Window *activewin;
Column *activecol;
Buffer snarfbuf;