changeset 43543:40d7df9af355

(mouse-wheel-mode): Pass vectors instead of symbols to `define-key', since it no longer accepts the latter.
author Miles Bader <miles@gnu.org>
date Mon, 25 Feb 2002 23:46:09 +0000
parents 809c9be7bf38
children 7aab4e4b4437
files lisp/mwheel.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mwheel.el	Mon Feb 25 23:26:38 2002 +0000
+++ b/lisp/mwheel.el	Mon Feb 25 23:46:09 2002 +0000
@@ -154,7 +154,7 @@
          (dn (intern (format prefix mouse-wheel-down-button)))
          (up (intern (format prefix mouse-wheel-up-button)))
          (keys
-          (nconc (list dn up)
+          (nconc (list (vector dn) (vector up))
                  (mapcar (lambda (amt) `[(,@(car amt) ,up)])
                          (cdr mouse-wheel-scroll-amount))
                  (mapcar (lambda (amt) `[(,@(car amt) ,dn)])