diff options
author | Julien Danjou <julien@danjou.info> | 2011-03-09 21:14:55 -0500 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2011-03-09 21:14:55 -0500 |
commit | ec6ecaed88d6b6fbc966acf14b4fdd2f3ee37227 (patch) | |
tree | c5e0825a6f35e946694cb5cb5c06006819659f6d /lisp/avoid.el | |
parent | 9d5aa01d306750665de06d30f99dcff05fa6c53b (diff) | |
download | emacs-ec6ecaed88d6b6fbc966acf14b4fdd2f3ee37227.tar.gz |
Inhibit mouse-avoidance if cursor-type is nil (Bug#8209).
* lisp/avoid.el (mouse-avoidance-ignore-p): Do not move the cursor if
`cursor-type' is nil.
Diffstat (limited to 'lisp/avoid.el')
-rw-r--r-- | lisp/avoid.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/avoid.el b/lisp/avoid.el index fe47a0c4a33..c864d48e9ce 100644 --- a/lisp/avoid.el +++ b/lisp/avoid.el @@ -278,6 +278,7 @@ redefine this function to suit your own tastes." (defun mouse-avoidance-ignore-p () (let ((mp (mouse-position))) (or (not (frame-pointer-visible-p)) ; The pointer is hidden + (not cursor-type) ; There's no cursor executing-kbd-macro ; don't check inside macro (null (cadr mp)) ; don't move unless in an Emacs frame (not (eq (car mp) (selected-frame))) |