From 055016a45345776fb193b8d861ced6ae58046b47 Mon Sep 17 00:00:00 2001 From: Markus Rost Date: Mon, 9 Dec 2002 19:43:54 +0000 Subject: [PATCH] (mouse-wheel-scroll-amount): Revert previous change - customize type 'float is now defined. --- lisp/mwheel.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/mwheel.el b/lisp/mwheel.el index 8158db89731..546d27dd345 100644 --- a/lisp/mwheel.el +++ b/lisp/mwheel.el @@ -111,7 +111,7 @@ less than a full screen." (choice :tag "Normal" (const :tag "Full screen" :value nil) (integer :tag "Specific # of lines") - (number :tag "Fraction of window") + (float :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") - (number :tag "Fraction of window")))) + (float :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") - (number :tag "Fraction of window")))))) + (float :tag "Fraction of window")))))) (defcustom mouse-wheel-progessive-speed t "If non-nil, the faster the user moves the wheel, the faster the scrolling. -- 2.11.4.GIT