2017-02-13 05:51:29 -05:00
|
|
|
;;; feature/spellcheck/config.el
|
|
|
|
|
|
2017-02-23 00:06:12 -05:00
|
|
|
(def-package! flyspell ; built-in
|
2017-02-13 05:51:29 -05:00
|
|
|
:commands flyspell-mode
|
2017-02-19 18:32:26 -05:00
|
|
|
:config
|
|
|
|
|
(setq ispell-program-name (executable-find "aspell")
|
|
|
|
|
ispell-list-command "--list"
|
|
|
|
|
ispell-extr-args '("--dont-tex-check-comments"))
|
|
|
|
|
|
2017-02-23 00:06:12 -05:00
|
|
|
(map! :map flyspell-mode-map
|
2017-02-19 18:32:26 -05:00
|
|
|
:localleader
|
|
|
|
|
:n "s" 'flyspell-correct-word-generic
|
|
|
|
|
:n "S" 'flyspell-correct-previous-word-generic))
|
2017-02-13 05:51:29 -05:00
|
|
|
|
|
|
|
|
|
2017-02-23 00:06:12 -05:00
|
|
|
(def-package! flyspell-correct
|
2017-02-13 05:51:29 -05:00
|
|
|
:commands (flyspell-correct-word-generic
|
2017-03-19 22:47:50 -04:00
|
|
|
flyspell-correct-previous-word-generic)
|
2017-02-13 05:51:29 -05:00
|
|
|
:config
|
2017-03-19 22:47:50 -04:00
|
|
|
(cond ((featurep! :completion helm)
|
|
|
|
|
(require 'flyspell-correct-helm))
|
|
|
|
|
((featurep! :completion ivy)
|
|
|
|
|
(require 'flyspell-correct-ivy))
|
|
|
|
|
(t
|
|
|
|
|
(require 'flyspell-correct-popup)
|
|
|
|
|
(setq flyspell-popup-correct-delay 0.8)
|
|
|
|
|
(define-key popup-menu-keymap [escape] 'keyboard-quit))))
|
2017-02-21 16:48:19 -05:00
|
|
|
|
