emacs spellcheck

1 files changed, 22 insertions, 1 deletions

diff --git a/dot_emacs.tmpl b/dot_emacs.tmpl
index 832df90..24a85f7 100644
--- a/dot_emacs.tmpl
+++ b/dot_emacs.tmpl
@@ -23,7 +23,6 @@
   (put 'narrow-to-region 'disabled nil)
   :hook   ; add functions onto hook; only basename needed
   ((text-mode   . turn-on-auto-fill)
-   (text-mode   . flyspell-mode)
    (before-save . whitespace-cleanup))
   :bind   ; key bindings
   (("C-x a r" . align-regexp))
@@ -334,6 +333,20 @@ Extended Format date in the date field and return it as a string obeing
 (use-package fill-column-indicator
   :ensure t)
 
+(use-package flyspell
+  :bind
+  (("<f12>" . flyspell-auto-correct-previous-word))
+  :config
+  (unbind-key "C-;" flyspell-mode-map))
+
+(use-package flyspell-correct-ivy
+  :ensure t
+  :after flyspell
+  :bind
+  ("C-<f12>" . flyspell-correct-wrapper)
+  :config
+  (setq flyspell-correct-interface #'flyspell-correct-ivy))
+
 (use-package gnus
   :ensure t
   :defer t
@@ -709,6 +722,10 @@ Returns a formatted BibTeX entry."
      ("Transactions of the American Mathematical Society")
      ("{ACM} {SIGACT} News" "ACM SIGACT News"))))
 
+(use-package prog-mode
+  :hook
+  ((prog-mode . flyspell-prog-mode)))
+
 (use-package reftex-cite
   :ensure t)
 
@@ -1011,6 +1028,10 @@ If not, issue a warning."
 		   "zathura"))))
   (add-to-list 'TeX-view-program-selection '(output-pdf "Zathura")))
 
+(use-package text-mode
+  :hook
+  ((text-mode . flyspell-mode)))
+
 (use-package tool-bar
   :config
   (tool-bar-mode -1))