emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Requested changes -- move defvar to preface

Browse source 
We can now remove the redundant hack.
This commit is contained in:
Ian Wahbe 2020-11-13 20:51:54 +01:00
parent ea16bb66c3
commit a31dced7bc
2 changed files with 6 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

6
modules/checkers/spell/autoload/+spell-fu.el
View file

@ -57,12 +57,6 @@
or (and ispell-really-aspell ispell-program-name)
(executable-find "aspell"))
(user-error "Aspell is required for spell checking"))
;; HACK When spell-fu fails to initialize correctly, the init form for the
;; spell-fu use-package! is not called. This leaves emacs to assume that
;; certain variables are initialized when they are not. We bind what we
;; need.
(unless (boundp '+spell-correct-interface)
(+spell-defun-correct-interface))
(ispell-set-spellchecker-params)
(save-current-buffer

13
modules/checkers/spell/config.el
View file

@ -70,21 +70,20 @@
(eval-if! (not (featurep! +flyspell))
(defun +spell-defun-correct-interface ()
(use-package! spell-fu
:when (executable-find "aspell")
:hook (text-mode . spell-fu-mode)
:general ([remap ispell-word] #'+spell/correct)
:preface
(defvar +spell-correct-interface
(cond ((featurep! :completion ivy)
#'+spell-correct-ivy-fn)
((featurep! :completion helm)
#'+spell-correct-helm-fn)
(#'+spell-correct-generic-fn))
"Function to use to display corrections."))
"Function to use to display corrections.")
(use-package! spell-fu
:when (executable-find "aspell")
:hook (text-mode . spell-fu-mode)
:general ([remap ispell-word] #'+spell/correct)
:init
(+spell-defun-correct-interface)
(defvar +spell-excluded-faces-alist
'((markdown-mode
. (markdown-code-face