[Emacs-diffs] Changes to emacs/lisp/mwheel.el

[John Paul Wallington]

Index: emacs/lisp/mwheel.el
diff -c emacs/lisp/mwheel.el:1.17 emacs/lisp/mwheel.el:1.18
*** emacs/lisp/mwheel.el:1.17   Thu Jun 27 17:45:42 2002
--- emacs/lisp/mwheel.el        Thu Aug 29 18:06:26 2002
***************
*** 64,70 ****
    :set 'mouse-wheel-change-button)
  
  (defcustom mouse-wheel-up-button 5
!   "Obsolete.  Use `mouse-whell-up-event'.")
  (defcustom mouse-wheel-up-event
    ;; In the latest versions of XEmacs, we could just use mouse-%s as well.
    (intern (format (if (featurep 'xemacs) "button%s" "mouse-%s")
--- 64,70 ----
    :set 'mouse-wheel-change-button)
  
  (defcustom mouse-wheel-up-button 5
!   "Obsolete.  Use `mouse-wheel-up-event'.")
  (defcustom mouse-wheel-up-event
    ;; In the latest versions of XEmacs, we could just use mouse-%s as well.
    (intern (format (if (featurep 'xemacs) "button%s" "mouse-%s")
***************
*** 133,139 ****
                  mouse-wheel-up-event
                mouse-wheel-down-event))
          x)))
!   (fset  'mwheel-event-button 'event-button))
  
  (if (not (fboundp 'event-window))
      (defun mwheel-event-window (event)
--- 133,139 ----
                  mouse-wheel-up-event
                mouse-wheel-down-event))
          x)))
!   (fset 'mwheel-event-button 'event-button))
  
  (if (not (fboundp 'event-window))
      (defun mwheel-event-window (event)