Fix wording and punctuation of a recent commit

* lisp/textmodes/ispell.el (ispell-correct-p): Doc fix.
* lisp/emacs-lisp/checkdoc.el (checkdoc-ispell-init): Fix
capitalization and punctuation of comments.
This commit is contained in:
Eli Zaretskii 2020-01-17 11:35:35 +02:00
parent 0d3d3be35c
commit a785be29bf
2 changed files with 5 additions and 5 deletions

View file

@ -2110,8 +2110,8 @@ nil."
(unless ispell-process
(condition-case nil
(progn
(ispell-set-spellchecker-params) ; Initialize variables and dicts alists
(ispell-accept-buffer-local-defs) ; use the correct dictionary
(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"))))

View file

@ -2015,7 +2015,7 @@ quit spell session exited."
(defun ispell--run-on-word (word)
"Run ispell on WORD."
(ispell-send-string "%\n") ; put in verbose mode
(ispell-send-string "%\n") ; Put the speller in verbose mode.
(ispell-send-string (concat "^" word "\n"))
;; wait until ispell has processed word
(while (progn
@ -2035,13 +2035,13 @@ quit spell session exited."
(or ispell-current-dictionary "default")))
(defun ispell-correct-p (&optional following)
"Return t if the word at point is correct. Nil otherwise.
"Return t if the word at point is correct, nil otherwise.
If optional argument FOLLOWING is non-nil then the following
word (rather than preceding) is checked when the cursor is not
over a word."
(save-excursion
;; reset ispell-filter so it only contains the result of
;; Reset ispell-filter so it only contains the result of
;; spell-checking the current-word:
(setq ispell-filter nil)
(let* ((word-and-boundaries (ispell-get-word following))