diff --git a/avy.el b/avy.el index e076e1c..28700f1 100644 --- a/avy.el +++ b/avy.el @@ -540,12 +540,14 @@ Set `avy-style' according to COMMMAND as well." "Auto correct word at PT." (save-excursion (goto-char pt) - (if (looking-at-p "\\b") - (ispell-word) - (progn - (backward-word) - (when (looking-at-p "\\b") - (ispell-word)))))) + (if (bound-and-true-p flyspell-mode) + (flyspell-correct-word-before-point) + (if (looking-at-p "\\b") + (ispell-word) + (progn + (backward-word) + (when (looking-at-p "\\b") + (ispell-word))))))) (defun avy--process (candidates overlay-fn) "Select one of CANDIDATES using `avy-read'.