b644f8abd7
This commit moves the – previously disabled – `auto-dictionary` code to the `spell-checking` layer and activate it. It is now enabled by default, but can be disabled by setting `spell-checking-auto-dictionary` to `nil`. `auto-dictionary` comes with some interesting improvements: - Tries to automatically detect what is the language of the buffer and activate the corresponding dictionary. - When a buffer is opened, all spelling mistakes are shown without needing first to be under the cursor. - When the dictionary is changed, the whole buffer is reanalyzed for spelling mistakes (close #2088).
56 lines
1.5 KiB
EmacsLisp
56 lines
1.5 KiB
EmacsLisp
;;; packages.el --- Spell Checking Layer packages File for Spacemacs
|
|
;;
|
|
;; Copyright (c) 2012-2014 Sylvain Benner
|
|
;; Copyright (c) 2014-2015 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;;; License: GPLv3
|
|
|
|
(setq spell-checking-packages
|
|
'(
|
|
auto-dictionary
|
|
flyspell
|
|
helm-flyspell
|
|
))
|
|
|
|
(defun spell-checking/init-auto-dictionary ()
|
|
(use-package auto-dictionary
|
|
:defer t
|
|
:if spell-checking-auto-dictionary
|
|
:init
|
|
(add-hook 'flyspell-mode-hook 'auto-dictionary-mode)))
|
|
|
|
(defun spell-checking/init-flyspell ()
|
|
(use-package flyspell
|
|
:defer t
|
|
:commands (spell-checking/change-dictionary)
|
|
:init
|
|
(progn
|
|
(spell-checking/add-flyspell-hook 'org-mode)
|
|
(spell-checking/add-flyspell-hook 'text-mode)
|
|
(when spell-checking-enable-by-default
|
|
(add-hook 'prog-mode-hook 'flyspell-prog-mode))
|
|
|
|
(spacemacs|add-toggle spelling-checking
|
|
:status flyspell-mode
|
|
:on (flyspell-mode)
|
|
:off (flyspell-mode -1)
|
|
:documentation
|
|
"Enable automatic spell checking."
|
|
:evil-leader "tS")
|
|
|
|
(evil-leader/set-key
|
|
"Sd" 'spell-checking/change-dictionary
|
|
"Sn" 'flyspell-goto-next-error))
|
|
:config
|
|
(spacemacs|diminish flyspell-mode " Ⓢ" " S")))
|
|
|
|
(defun spell-checking/init-helm-flyspell ()
|
|
(use-package helm-flyspell
|
|
:commands helm-flyspell-correct
|
|
:init (evil-leader/set-key "Sc" 'helm-flyspell-correct)))
|