Mercurial > emacs
comparison lisp/textmodes/ispell.el @ 21591:231db957ece0
(ispell-word): In ispell-check-only mode,
display a message for misspelled word.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 17 Apr 1998 03:21:24 +0000 |
| parents | e15a9b5e0a70 |
| children | 47b8415a9976 |
comparison
equal
deleted
inserted
replaced
| 21590:ef61a9126a73 | 21591:231db957ece0 |
|---|---|
| 911 (message "%s is correct because of root %s" | 911 (message "%s is correct because of root %s" |
| 912 (funcall ispell-format-word word) | 912 (funcall ispell-format-word word) |
| 913 (funcall ispell-format-word poss)))) | 913 (funcall ispell-format-word poss)))) |
| 914 ((null poss) (message "Error in ispell process")) | 914 ((null poss) (message "Error in ispell process")) |
| 915 (ispell-check-only ; called from ispell minor mode. | 915 (ispell-check-only ; called from ispell minor mode. |
| 916 (message "Misspelled word `%s'" word) | |
| 916 (beep)) | 917 (beep)) |
| 917 (t ; prompt for correct word. | 918 (t ; prompt for correct word. |
| 918 (save-window-excursion | 919 (save-window-excursion |
| 919 (setq replace (ispell-command-loop | 920 (setq replace (ispell-command-loop |
| 920 (car (cdr (cdr poss))) | 921 (car (cdr (cdr poss))) |