changeset 51463:26fea2099cbc

No need to bind wheel events specially.
author Jason Rumney <jasonr@gnu.org>
date Wed, 04 Jun 2003 21:54:08 +0000
parents ba5edb1b9c8b
children 73188b413b0f
files lisp/term/mac-win.el
diffstat 1 files changed, 1 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/term/mac-win.el	Wed Jun 04 21:53:00 2003 +0000
+++ b/lisp/term/mac-win.el	Wed Jun 04 21:54:08 2003 +0000
@@ -241,10 +241,7 @@
 			   global-map)
 
 ;; Support mouse-wheel scrolling
-(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)
 
 ;; (prefer-coding-system 'mac-roman)