Re: Wheel mouse under X.
- To: mathgroup at smc.vnet.net
- Subject: [mg19018] Re: Wheel mouse under X.
- From: Bruno Daniel <bruno.daniel at hadiko.de>
- Date: Tue, 3 Aug 1999 13:44:51 -0400
- Organization: University of Karlsruhe
- References: <7luhai$kc0@smc.vnet.net> <7m147k$pff@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi Gadi and Paul With the scwm window manager (it's similar to FVWM and can be programmed in Lisp like Emacs. Download it for free on page http://scwm.mit.edu/), you can easily solve the problem this way (in your .scwmrc file). -------------------------------------------------------------------- (bind-mouse 'window 4 (lambda () (if (wildcard-match? "XMathematica" (current-window-with-pointer)) (send-key-press "Prior" (current-window-with-pointer) #t #t #t)) (send-button-press "4" #f #t #t))) (bind-mouse 'window 5 (lambda () (if (wildcard-match? "XMathematica" (current-window-with-pointer)) (send-key-press "Next" (current-window-with-pointer) #t #t #t) (send-button-press "5" #f #t #t)))) -------------------------------------------------------------------- This translates your scroll-events to PageUp or PageDown keypress events when occuring over a Mathematica window. You can do the same for other programs that cannot handle button-4 and button-5 events (the scroll wheel) by just generalizing the wildcard match in the code above. Yours sincerely Bruno P.S. I set the following in my .Xresources file: ------------------------------------------------------- *XmGUIFileBox*XmTextField.baseTranslations: \ #override \n\ <Key>Tab: GUIFileBoxCompleteSelection() ------------------------------------------------------- since I'm used to pressing Tab for filename completion in the shell.