lisp/text.el


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25


;;; Code:
(defun setup-text-mode ()
  "Disable word wrap in text mode."
  (setq word-wrap t)
  (display-line-numbers-mode -1)
  )

(add-hook 'text-mode-hook 'setup-text-mode)
(use-package ispell
  :ensure t
  :config
  (setq ispell-program-name (executable-find "hunspell")
        ispell-dictionary "en_US")
  )

(use-package flyspell
    :ensure t
    :hook (text-mode . flyspell-mode)
    :config
    (set-face-attribute 'flyspell-incorrect nil :foreground nil :weight 'normal :underline '(:color "red" :style wave))
    )

(provide 'text)
;;; text.el ends here