(mouse-wheel-scroll-amount): Fix customize type.

This commit is contained in:
Andreas Schwab 2002-12-01 23:37:29 +00:00
parent 5213c97dc5
commit dd60908b89

View file

@ -111,7 +111,7 @@ less than a full screen."
(choice :tag "Normal"
(const :tag "Full screen" :value nil)
(integer :tag "Specific # of lines")
(float :tag "Fraction of window")
(number :tag "Fraction of window")
(cons
(repeat (choice :tag "modifier"
(const alt) (const control) (const hyper)
@ -119,7 +119,7 @@ less than a full screen."
(choice :tag "scroll amount"
(const :tag "Full screen" :value nil)
(integer :tag "Specific # of lines")
(float :tag "Fraction of window"))))
(number :tag "Fraction of window"))))
(repeat
(cons
(repeat (choice :tag "modifier"
@ -128,7 +128,7 @@ less than a full screen."
(choice :tag "scroll amount"
(const :tag "Full screen" :value nil)
(integer :tag "Specific # of lines")
(float :tag "Fraction of window"))))))
(number :tag "Fraction of window"))))))
(defcustom mouse-wheel-progessive-speed t
"If non-nil, the faster the user moves the wheel, the faster the scrolling.