Re: emacs et la molette

[Jacques L'helgoualc'h <lhh@free.fr>]

Régis Grison a écrit, mercredi 16 octobre 2002, à 18:55 :
> Le mer 16/10/2002 à 18:29, Erwan David a écrit :
> > Le Wed 16/10/2002, Régis Grison disait
> > > Bon, ben suis bien content de mon nouvel emacs, vu qu'on en est là,
> > > est-ce que quelqu'un a déjà réussi à faire marcher la molette de la
> > > souris ?
[...]
> > (require 'mwheel)
> > (mwheel-install) 
> > dans le .emacs ou le .xemacs/init.el
> 
> Pas plus d'effet :(

J'ai ça depuis emacs20, qui  marche toujours (m'enfin, quand le tapis de
souris n'est pas occupé par la bière et les bretzels) :

;;; mulot à roulette
(setq wheel-scroll-interval 6)
(defun wheel-scroll-down-some-lines ()
	(interactive)
	(scroll-down wheel-scroll-interval))
(defun wheel-scroll-up-some-lines ()
	(interactive)
	(scroll-up wheel-scroll-interval))

(defun wheel-scroll-down-page ()
	(interactive)
	(scroll-down))
(defun wheel-scroll-up-page ()
	(interactive)
	(scroll-up))

(global-set-key [mouse-4] 'wheel-scroll-up-some-lines)
(global-set-key [mouse-5] 'wheel-scroll-down-some-lines)
(global-set-key [S-mouse-4] 'wheel-scroll-up-page)
(global-set-key [S-mouse-5] 'wheel-scroll-down-page)
;; end mulot

-- 
Jacques L'helgoualc'h