mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
Fix #3827: void-variable flyspell-delayed-commands
This occurs in org-compat.el: (eval-after-load "flyspell" '(add-to-list 'flyspell-delayed-commands 'org-self-insert-command)) By not using a package symbol, this code runs whenever any file named flyspell.el is loaded. Guess what one of the :checkers spell module's autoloads files is named? flyspell.el
This commit is contained in:
28
modules/checkers/spell/autoload/+flyspell.el
Normal file
28
modules/checkers/spell/autoload/+flyspell.el
Normal file
@ -0,0 +1,28 @@
|
||||
;;; checkers/spell/autoload/+flyspell.el -*- lexical-binding: t; -*-
|
||||
;;;###if (featurep! +flyspell)
|
||||
|
||||
;;;###autodef
|
||||
(defalias 'flyspell-mode! #'flyspell-mode)
|
||||
|
||||
(defvar +spell--flyspell-predicate-alist nil
|
||||
"TODO")
|
||||
|
||||
;;;###autodef
|
||||
(defun set-flyspell-predicate! (modes predicate)
|
||||
"TODO"
|
||||
(declare (indent defun))
|
||||
(dolist (mode (doom-enlist modes) +spell--flyspell-predicate-alist)
|
||||
(add-to-list '+spell--flyspell-predicate-alist (cons mode predicate))))
|
||||
|
||||
;;;###autoload
|
||||
(defun +spell-init-flyspell-predicate-h ()
|
||||
"TODO"
|
||||
(when-let (pred (assq major-mode +spell--flyspell-predicate-alist))
|
||||
(setq-local flyspell-generic-check-word-predicate (cdr pred))))
|
||||
|
||||
;;;###autoload
|
||||
(defun +spell-correction-at-point-p (&optional point)
|
||||
"TODO"
|
||||
(cl-loop for ov in (overlays-at (or point (point)))
|
||||
if (overlay-get ov 'flyspell-overlay)
|
||||
return t))
|
Reference in New Issue
Block a user