Mercurial > emacs

changeset 48772:baf774b3f991

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mouse-wheel-scroll-amount): Revert previous change - customize type 'float is now defined.
author Markus Rost <rost@math.uni-bielefeld.de>
date Mon, 09 Dec 2002 19:43:54 +0000
parents 68ba1a03c8d7
children 35cbff0c4bd1
files lisp/mwheel.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mwheel.el	Mon Dec 09 19:37:58 2002 +0000
+++ b/lisp/mwheel.el	Mon Dec 09 19:43:54 2002 +0000
@@ -111,7 +111,7 @@
 	  (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 @@
 		   (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 @@
             (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.