[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/w32-vars.el
From: |
Jason Rumney |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/w32-vars.el |
Date: |
Mon, 25 Feb 2002 18:17:47 -0500 |
Index: emacs/lisp/w32-vars.el
diff -c emacs/lisp/w32-vars.el:1.1 emacs/lisp/w32-vars.el:1.2
*** emacs/lisp/w32-vars.el:1.1 Sun Jan 20 10:28:28 2002
--- emacs/lisp/w32-vars.el Mon Feb 25 18:17:44 2002
***************
*** 31,40 ****
:version "21.3"
:prefix "w32")
! (defcustom mouse-wheel-scroll-amount 4
! "*Number of lines to scroll per click of the mouse wheel."
! :type 'integer
! :group 'w32)
;; Redefine the font selection to use the standard W32 dialog
(defcustom w32-use-w32-font-dialog t
--- 31,58 ----
: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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/w32-vars.el,
Jason Rumney <=