Make sure `flyspell-word' checks word after (flyspell-check-previous-highlighted-word) run.

c11a5a9c · Agustín Martín · 71ab16dd · c11a5a9c
Commit c11a5a9c authored Jun 25, 2010 by Agustín Martín
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 1 deletion

lisp/textmodes/flyspell.el lisp/textmodes/flyspell.el +3 -1

No files found.
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -1817,7 +1817,9 @@ misspelled words backwards."
 			(throw 'exit t)))))))
 	(save-excursion
 	  (goto-char pos)
-	  (ispell-word))
+	  (ispell-word)
+	  (setq flyspell-word-cache-word nil) ;; Force flyspell-word re-check
+	  (flyspell-word))
      (error "No word to correct before point"))))

 ;;*---------------------------------------------------------------------*/