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

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