flyspell: correct words with completing-read

1 files changed, 5 insertions, 3 deletions

diff --git a/lisp/init-flyspell.el b/lisp/init-flyspell.el
index 77f6731..1d155aa 100644
--- a/lisp/init-flyspell.el
+++ b/lisp/init-flyspell.el
@@ -9,14 +9,16 @@
          (org-mode . flyspell-mode)
          (latex-mode . flyspell-mode))
 
-  :bind (:map flyspell-mode-map
-              ("C-c s" . flyspell-correct-word-before-point))
-
   :config
   ;; prefer hunspell
   (when (executable-find "hunspell")
     (setq ispell-program-name "hunspell")))
 
+(use-package flyspell-correct
+  :ensure t
+  :bind (:map flyspell-mode-map
+              ("C-c s" . flyspell-correct-wrapper)))
+
 (provide 'init-flyspell)
 
 ;;; init-flyspell.el ends here