# HG changeset patch
# User Jason Rumney <jasonr@gnu.org>
# Date 1020550591 0
# Node ID 7b1914d77b250ac7de91f10a67bdee82bf8d9da1
# Parent  7648ca9b6024ca0942215a564821538b39a7869a
(mouse-wheel-scroll-amount): Removed.

diff -r 7648ca9b6024 -r 7b1914d77b25 lisp/w32-vars.el
--- a/lisp/w32-vars.el	Sat May 04 22:16:04 2002 +0000
+++ b/lisp/w32-vars.el	Sat May 04 22:16:31 2002 +0000
@@ -33,29 +33,6 @@
   :version "21.3"
   :prefix "w32")
 
-;; mwheel.el should probably be adapted to accept mouse-wheel events
-;; then this could go.
-(defcustom mouse-wheel-scroll-amount '(5  ((shift) . 1) ((control) . nil))
-  "*Amount to scroll windows by when spinning the mouse wheel.
-This is actually a cons cell, where the first item is the amount to scroll
-on a normal wheel event. The rest is ignored on Windows, see mwheel.el if
-you wish to implement modifier keys."
-  :group 'w32
-  :group 'mouse
-  :type '(cons
-	  (choice :tag "Normal"
-		  (const :tag "Full screen" :value nil)
-		  (integer :tag "Specific # of lines")
-		  (float :tag "Fraction of window"))
-          (repeat
-           (cons
-            (repeat (choice :tag "modifier" (const alt) (const control) (const hyper)
-                            (const meta) (const shift) (const super)))
-            (choice :tag "scroll amount"
-                    (const :tag "Full screen" :value nil)
-                    (integer :tag "Specific # of lines")
-                    (float :tag "Fraction of window"))))))
-
 ;; Redefine the font selection to use the standard W32 dialog
 (defcustom w32-use-w32-font-dialog t
   "*Use the standard font dialog.