doomemacs/modules/feature/spellcheck/config.el

;;; feature/spellcheck/config.el -*- lexical-binding: t; -*-

(def-package! flyspell ; built-in
  :commands flyspell-mode
  :config
  (setq ispell-program-name (executable-find "aspell")
        ispell-list-command "--list"
        ispell-extr-args '("--dont-tex-check-comments"))

  (defun +spellcheck|automatically ()
    "Spellcheck the buffer when `flyspell-mode' is enabled."
    (when flyspell-mode
      (flyspell-buffer)))
  (add-hook 'flyspell-mode-hook #'+spellcheck|automatically))


(def-package! flyspell-correct
  :commands (flyspell-correct-word-generic
             flyspell-correct-previous-word-generic)
  :config
  (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))))
Major optimization refactor, across the board + enable lexical-scope everywhere (lexical-binding = t): ~5-10% faster startup; ~5-20% general boost + reduce consing, function calls & garbage collection by preferring cl-loop & dolist over lambda closures (for mapc[ar], add-hook, and various cl-lib filter/map/reduce functions) -- where possible + prefer functions with dedicated opcodes, like assq (see byte-defop's in bytecomp.el for more) + prefer pcase & cond (faster) over cl-case + general refactor for code readability + ensure naming & style conventions are adhered to + appease byte-compiler by marking unused variables with underscore + defer minor mode activation to after-init, emacs-startup or window-setup hooks; a customization opportunity for users + ensures custom functionality won't interfere with startup. 2017-06-08 17:47:56 +08:00			`;;; feature/spellcheck/config.el -- lexical-binding: t; --`
Add modules/feature/spellcheck 2017-02-13 18:51:29 +08:00
Revert macros to ...! name convention (elisp doesn't like @...) 2017-02-23 13:06:12 +08:00			`(def-package! flyspell ; built-in`
Add modules/feature/spellcheck 2017-02-13 18:51:29 +08:00			`:commands flyspell-mode`
Update modules/feature/spellcheck 2017-02-20 07:32:26 +08:00			`:config`
			`(setq ispell-program-name (executable-find "aspell")`
			`ispell-list-command "--list"`
feature/spellcheck: auto-check buffer on flycheck-mode 2018-01-16 14:55:06 +08:00			`ispell-extr-args '("--dont-tex-check-comments"))`

			`(defun +spellcheck\|automatically ()`
			"Spellcheck the buffer when `flyspell-mode' is enabled."
			`(when flyspell-mode`
			`(flyspell-buffer)))`
			`(add-hook 'flyspell-mode-hook #'+spellcheck\|automatically))`
Add modules/feature/spellcheck 2017-02-13 18:51:29 +08:00

Revert macros to ...! name convention (elisp doesn't like @...) 2017-02-23 13:06:12 +08:00			`(def-package! flyspell-correct`
Add modules/feature/spellcheck 2017-02-13 18:51:29 +08:00			`:commands (flyspell-correct-word-generic`
Reduce def-package magic; explicitly use :when property 2017-03-20 10:47:50 +08:00			`flyspell-correct-previous-word-generic)`
Add modules/feature/spellcheck 2017-02-13 18:51:29 +08:00			`:config`
Reduce def-package magic; explicitly use :when property 2017-03-20 10:47:50 +08: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)`
PRAISE BE TO THE BYTE COMPILER FOR THY SHARP QUOTES 2017-04-17 14:17:10 +08:00			`(define-key popup-menu-keymap [escape] #'keyboard-quit))))`
feature/spellcheck: use flyspell-correct-{ivy,helm} 2017-02-22 05:48:19 +08:00