X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/cce7d53002e8abc346b67ea4100507b0e7c4d68e..eebc475df54de7ad5c04ef7cddc083c865235540:/lisp/avoid.el diff --git a/lisp/avoid.el b/lisp/avoid.el index fe47a0c4a3..c864d48e9c 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)))