usr/contrib/lib/emacs/lisp/spell.elc


(defvar spell-command "spell" "\
*Command to run the spell program.")

(defvar spell-filter nil "\
*Filter function to process text before passing it to spell program.
This function might remove text-processor commands.
nil means don't alter the text before checking it.")

(defun spell-buffer nil "\
Check spelling of every word in the buffer.
For each incorrect word, you are asked for the correct spelling
and then put into a query-replace to fix some or all occurrences.
If you do not want to change a word, just give the same word
as its \"correct\" spelling; then the query replace is skipped." (interactive) (byte-code "À\88ÁedÂ#\87" [nil spell-region "buffer"] 4))

(defun spell-word nil "\
Check spelling of word at or before point.
If it is not correct, ask user for the correct spelling
and query-replace the entire buffer to substitute it." (interactive) (byte-code "Ã\88ÃÃÃ\1a\19\18\8aÄÅ!?\85\13