# HG changeset patch # User Jason Rumney # Date 1054505587 0 # Node ID c750333d879e0567d9fbfe33fab2f2becae9ce17 # Parent a838a46a67a67662a75ed5c392e1d08fc714fa60 No need to bind wheel events specially. diff -r a838a46a67a6 -r c750333d879e lisp/term/w32-win.el --- a/lisp/term/w32-win.el Sun Jun 01 21:48:53 2003 +0000 +++ b/lisp/term/w32-win.el Sun Jun 01 22:13:07 2003 +0000 @@ -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."