;;  sample xemacs init.el code to allow scrolling with mousewheel

;; ...

;; allow use of z-axis (mouse wheel) to scroll
(mwheel-install)
(setq mwheel-follow-mouse t)