# HG changeset patch
# User Jason Rumney <jasonr@gnu.org>
# Date 1054763648 0
# Node ID 26fea2099cbc4ab0ac1152b798def26a8e9e9306
# Parent  ba5edb1b9c8b46cf356cd1a31a7e3a869dff08e3
No need to bind wheel events specially.

diff -r ba5edb1b9c8b -r 26fea2099cbc lisp/term/mac-win.el
--- 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)