doomemacs/modules/feature/spellcheck/config.el

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

(defvar-local +spellcheck-immediately t
  "If non-nil, spellcheck the current buffer upon starting `flyspell-mode'.

Since spellchecking can be slow in some buffers, this can be disabled with:

  (setq-hook! 'TeX-mode-hook +spellcheck-immediately nil)")

;; `ispell'
(setq ispell-dictionary "english"
      ispell-list-command "--list"
      ispell-extr-args '("--dont-tex-check-comments"))

(after! ispell
  (when (equal (file-name-base ispell-program-name) "aspell")
    (add-to-list 'ispell-extra-args "--sug-mode=ultra")))


(def-package! flyspell ; built-in
  :defer t
  :init (add-hook 'flyspell-mode-hook #'+spellcheck|immediately)
  :config
  (defun +spellcheck|immediately ()
    "Spellcheck the buffer when `flyspell-mode' is enabled."
    (when (and flyspell-mode +spellcheck-immediately)
      (flyspell-buffer))))


(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))
        ((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 11:47:56 +02:00			`;;; feature/spellcheck/config.el -- lexical-binding: t; --`
Add modules/feature/spellcheck 2017-02-13 05:51:29 -05:00
feature/spellcheck: conditionally spellcheck on load 2018-05-07 22:36:28 +02:00			`(defvar-local +spellcheck-immediately t`
			"If non-nil, spellcheck the current buffer upon starting `flyspell-mode'.

			`Since spellchecking can be slow in some buffers, this can be disabled with:`

Update +spellcheck-immediately docstring It won't work on LaTeX-mode-hook because flyspell-mode is added to TeX-mode-hook, which runs before the former. 2018-08-02 16:46:04 +02:00			`(setq-hook! 'TeX-mode-hook +spellcheck-immediately nil)")`
feature/spellcheck: conditionally spellcheck on load 2018-05-07 22:36:28 +02:00
Move ispell-dictionary default to feature/spellcheck #630 Makes more sense to be here. 2018-06-01 02:25:38 +02:00			;; `ispell'
feature/spellcheck: minor reformatting 2018-08-02 16:40:47 +02:00			`(setq ispell-dictionary "english"`
			`ispell-list-command "--list"`
			`ispell-extr-args '("--dont-tex-check-comments"))`
Move ispell-dictionary default to feature/spellcheck #630 Makes more sense to be here. 2018-06-01 02:25:38 +02:00
feature/spellcheck: add hunspell/aspell support 2018-08-02 21:44:09 +02:00			`(after! ispell`
Don't override ispell-program-name Better not to override possible user customizations, only adjust ispell-extra-args in case of aspell, to improve its performance. 2018-08-10 23:41:55 +02:00			`(when (equal (file-name-base ispell-program-name) "aspell")`
			`(add-to-list 'ispell-extra-args "--sug-mode=ultra")))`
feature/spellcheck: add hunspell/aspell support 2018-08-02 21:44:09 +02:00

Revert macros to ...! name convention (elisp doesn't like @...) 2017-02-23 00:06:12 -05:00			`(def-package! flyspell ; built-in`
Major refactor & optimization of how modules load their packages Now that we are loading package autoloads files (as part of the generated doom-package-autoload-file when running make autoloads), many :commands properties are redundant. In fact, many def-package! blocks are redundant. In some cases, we can do without a config.el file entirely, and can move into the autoloads file or rely entirely on package autoloads. Also, many settings have been moved in their module's autoloads files, which makes them available ASAP; their use no longer depends on module load order. This gained me a modest ~10% boost in startup speed. 2018-05-25 00:46:11 +02:00			`:defer t`
feature/spellcheck: minor reformatting 2018-08-02 16:40:47 +02:00			`:init (add-hook 'flyspell-mode-hook #'+spellcheck\|immediately)`
Update modules/feature/spellcheck 2017-02-19 18:32:26 -05:00			`:config`
feature/spellcheck: conditionally spellcheck on load 2018-05-07 22:36:28 +02:00			`(defun +spellcheck\|immediately ()`
feature/spellcheck: auto-check buffer on flycheck-mode 2018-01-16 01:55:06 -05:00			"Spellcheck the buffer when `flyspell-mode' is enabled."
feature/spellcheck: conditionally spellcheck on load 2018-05-07 22:36:28 +02:00			`(when (and flyspell-mode +spellcheck-immediately)`
			`(flyspell-buffer))))`
Add modules/feature/spellcheck 2017-02-13 05:51:29 -05:00

Revert macros to ...! name convention (elisp doesn't like @...) 2017-02-23 00:06:12 -05:00			`(def-package! flyspell-correct`
Add modules/feature/spellcheck 2017-02-13 05:51:29 -05:00			`:commands (flyspell-correct-word-generic`
Reduce def-package magic; explicitly use :when property 2017-03-19 22:47:50 -04:00			`flyspell-correct-previous-word-generic)`
Add modules/feature/spellcheck 2017-02-13 05:51:29 -05:00			`:config`
Reduce def-package magic; explicitly use :when property 2017-03-19 22:47:50 -04:00			`(cond ((featurep! :completion helm)`
			`(require 'flyspell-correct-helm))`
			`((featurep! :completion ivy)`
			`(require 'flyspell-correct-ivy))`
feature/spellcheck: minor refactor 2018-05-30 01:44:56 +02:00			`((require 'flyspell-correct-popup)`
Reduce def-package magic; explicitly use :when property 2017-03-19 22:47:50 -04:00			`(setq flyspell-popup-correct-delay 0.8)`
PRAISE BE TO THE BYTE COMPILER FOR THY SHARP QUOTES 2017-04-17 02:17:10 -04:00			`(define-key popup-menu-keymap [escape] #'keyboard-quit))))`