Mercurial > emacs
changeset 51386:c750333d879e
No need to bind wheel events specially.
| author | Jason Rumney <jasonr@gnu.org> |
|---|---|
| date | Sun, 01 Jun 2003 22:13:07 +0000 |
| parents | a838a46a67a6 |
| children | 97d539e7d0d1 |
| files | lisp/term/w32-win.el |
| diffstat | 1 files changed, 1 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- 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."