From 08aadee8ebe8231f2050bf3c7f36041ec938c07c Mon Sep 17 00:00:00 2001 From: Jason Rumney Date: Sun, 1 Jun 2003 22:13:07 +0000 Subject: No need to bind wheel events specially. --- lisp/term/w32-win.el | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 923f3f5ea14..27f72f94129 100644 --- a/lisp/term/w32-win.el +++ b/lisp/term/w32-win.el @@ -84,13 +84,7 @@ ;(defun w32-handle-scroll-bar-event (event) (interactive "e") (princ event)) ;; Handle mouse-wheel events with mwheel. -;; Normally only mouse-wheel-mode and mwheel-install are autoloaded, -;; but binding mouse-wheel must be done directly, since those functions -;; do not recognize mouse-wheel as a valid button. -(autoload 'mwheel-scroll "mwheel") -(global-set-key [mouse-wheel] 'mwheel-scroll) -(global-set-key [C-mouse-wheel] 'mwheel-scroll) -(global-set-key [S-mouse-wheel] 'mwheel-scroll) +(mouse-wheel-mode 1) (defun w32-drag-n-drop-debug (event) "Print the drag-n-drop EVENT in a readable form." -- cgit v1.2.1