diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-06-14 00:10:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-06-14 00:10:56 +0000 |
| commit | 276e4a5f873d65ba9e94da7afc7b17aadb56dfe2 (patch) | |
| tree | ed2ccc11c58ac1dd6658c49405feb897ac69cd3d /lisp/avoid.el | |
| parent | 0975b6c3f809c358f88cb1b5877d70deca8fcb65 (diff) | |
| download | emacs-276e4a5f873d65ba9e94da7afc7b17aadb56dfe2.tar.gz | |
(mouse-avoidance-threshold): Renamed from ...threshhold.
Diffstat (limited to 'lisp/avoid.el')
| -rw-r--r-- | lisp/avoid.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/avoid.el b/lisp/avoid.el index 214e5bb2757..029d338ba1b 100644 --- a/lisp/avoid.el +++ b/lisp/avoid.el @@ -83,7 +83,7 @@ instead.") (defvar mouse-avoidance-nudge-dist 15 "*Average distance that mouse will be moved when approached by cursor. Only applies in mouse-avoidance-mode `jump' and its derivatives. -For best results make this larger than `mouse-avoidance-threshhold'.") +For best results make this larger than `mouse-avoidance-threshold'.") (defvar mouse-avoidance-nudge-var 10 "*Variability of `mouse-avoidance-nudge-dist' (which see).") @@ -91,7 +91,7 @@ For best results make this larger than `mouse-avoidance-threshhold'.") (defvar mouse-avoidance-animation-delay .01 "Delay between animation steps, in seconds.") -(defvar mouse-avoidance-threshhold 5 +(defvar mouse-avoidance-threshold 5 "*Mouse-pointer's flight distance. If the cursor gets closer than this, the mouse pointer will move away. Only applies in mouse-avoidance-modes `animate' and `jump'.") @@ -143,14 +143,14 @@ Analogous to mouse-position." (defun mouse-avoidance-too-close-p (mouse) ;; Return t if mouse pointer and point cursor are too close. - ;; Acceptable distance is defined by mouse-avoidance-threshhold. + ;; Acceptable distance is defined by mouse-avoidance-threshold. (let ((point (mouse-avoidance-point-position))) (and (eq (car mouse) (car point)) (car (cdr mouse)) (< (abs (- (car (cdr mouse)) (car (cdr point)))) - mouse-avoidance-threshhold) + mouse-avoidance-threshold) (< (abs (- (cdr (cdr mouse)) (cdr (cdr point)))) - mouse-avoidance-threshhold)))) + mouse-avoidance-threshold)))) (defun mouse-avoidance-banish-destination () "The position to which mouse-avoidance-mode `banish' moves the mouse. @@ -311,7 +311,7 @@ Effects of the different modes: Whenever the mouse is moved, the frame is also raised. -\(see `mouse-avoidance-threshhold' for definition of \"too close\", +\(see `mouse-avoidance-threshold' for definition of \"too close\", and `mouse-avoidance-nudge-dist' and `mouse-avoidance-nudge-var' for definition of \"random distance\".)" (interactive |