[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/mwheel.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/mwheel.el |
Date: |
Mon, 25 Feb 2002 18:46:09 -0500 |
Index: emacs/lisp/mwheel.el
diff -c emacs/lisp/mwheel.el:1.8 emacs/lisp/mwheel.el:1.9
*** emacs/lisp/mwheel.el:1.8 Tue Feb 19 12:53:06 2002
--- emacs/lisp/mwheel.el Mon Feb 25 18:46:09 2002
***************
*** 154,160 ****
(dn (intern (format prefix mouse-wheel-down-button)))
(up (intern (format prefix mouse-wheel-up-button)))
(keys
! (nconc (list dn up)
(mapcar (lambda (amt) `[(,@(car amt) ,up)])
(cdr mouse-wheel-scroll-amount))
(mapcar (lambda (amt) `[(,@(car amt) ,dn)])
--- 154,160 ----
(dn (intern (format prefix mouse-wheel-down-button)))
(up (intern (format prefix mouse-wheel-up-button)))
(keys
! (nconc (list (vector dn) (vector up))
(mapcar (lambda (amt) `[(,@(car amt) ,up)])
(cdr mouse-wheel-scroll-amount))
(mapcar (lambda (amt) `[(,@(car amt) ,dn)])