From a594e0e1211b16571e250b94c98713eeef02bc8c Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 6 May 1995 02:18:20 +0000 Subject: [PATCH] (ispell-region): If position not visible, (sit-for 0). --- lisp/textmodes/ispell.el | 2 ++ 1 file changed, 2 insertions(+) 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 -- 2.39.2