Commit f0a1f8bd authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(ispell-word): Do not ignore short words.

parent a5f1c37e
......@@ -1468,9 +1468,8 @@ quit spell session exited."
end (car (cdr (cdr word)))
word (car word))
;; now check spelling of word if it has 3 or more characters.
(cond
((> (length word) 2)
;; At this point it used to ignore 2-letter words.
;; But that is silly; if the user asks for it, we should do it. - rms.
(or quietly
(message "Checking spelling of %s..."
(funcall ispell-format-word word)))
......@@ -1541,7 +1540,7 @@ quit spell session exited."
(kill-buffer ispell-choices-buffer))))
(ispell-pdict-save ispell-silently-savep)
;; NB: Cancels ispell-quit incorrectly if called from ispell-region
(if ispell-quit (setq ispell-quit nil replace 'quit))))
(if ispell-quit (setq ispell-quit nil replace 'quit)))
(goto-char cursor-location) ; return to original location
replace)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment