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

1 files changed, 3 insertions, 1 deletions

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index e5727f41e93..e8a92b101ef 100644
--- 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"))))
 
 ;;*---------------------------------------------------------------------*/