[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 1a6ed93: Revert "Always send Lisp words to checkdoc-ispell-init"
From: |
Lars Ingebrigtsen |
Subject: |
master 1a6ed93: Revert "Always send Lisp words to checkdoc-ispell-init" |
Date: |
Wed, 20 Jan 2021 16:12:25 -0500 (EST) |
branch: master
commit 1a6ed932d9d9779419f403e32e911f86657cb9f7
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Revert "Always send Lisp words to checkdoc-ispell-init"
This reverts commit 93141d581330d94e7eec9f114def2bec15f87866.
This would make checkdoc words be used in other flyspell
buffers.
---
lisp/emacs-lisp/checkdoc.el | 14 ++++++--------
1 file changed, 6 insertions(+), 8 deletions(-)
diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el
index aae807b..2e204ff 100644
--- a/lisp/emacs-lisp/checkdoc.el
+++ b/lisp/emacs-lisp/checkdoc.el
@@ -2106,14 +2106,12 @@ nil."
(unless ispell-process
(condition-case nil
(progn
- ;; Initialize variables and dict alists.
- (ispell-set-spellchecker-params)
- ;; Use the correct dictionary.
- (ispell-accept-buffer-local-defs))
- (error (setq checkdoc-spellcheck-documentation-flag nil))))
- ;; This code copied in part from ispell.el Emacs 19.34
- (dolist (w checkdoc-ispell-lisp-words)
- (process-send-string ispell-process (concat "@" w "\n"))))
+ (ispell-set-spellchecker-params) ; Initialize variables and dict
alists.
+ (ispell-accept-buffer-local-defs) ; Use the correct dictionary.
+ ;; This code copied in part from ispell.el Emacs 19.34
+ (dolist (w checkdoc-ispell-lisp-words)
+ (process-send-string ispell-process (concat "@" w "\n"))))
+ (error (setq checkdoc-spellcheck-documentation-flag nil)))))
(defun checkdoc-ispell-docstring-engine (end &optional take-notes)
"Run the Ispell tools on the doc string between point and END.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 1a6ed93: Revert "Always send Lisp words to checkdoc-ispell-init",
Lars Ingebrigtsen <=