From: Richard M. Stallman Date: Sat, 6 May 1995 02:18:20 +0000 (+0000) Subject: (ispell-region): If position not visible, (sit-for 0). X-Git-Tag: emacs-19.34~4143 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a594e0e1211b16571e250b94c98713eeef02bc8c;p=emacs.git (ispell-region): If position not visible, (sit-for 0). --- diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 4214c667af9..0a3b3201f04 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -1774,6 +1774,8 @@ With prefix argument, set the default directory." (concat "Ispell misalignment: word " "`%s' point %d; please retry") (car poss) word-start)) + (if (not (pos-visible-in-window-p)) + (sit-for 0)) (if ispell-keep-choices-win (setq replace (ispell-command-loop