mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/textmodes/ispell.el (ispell-word): Add to the error message

Browse source 
the word, ispell program name and current dictionary.
(ispell-tex-arg-end): Capitalize "error" in the error message.

Fixes: debbugs:9121
This commit is contained in:
Juri Linkov 2011-09-17 15:07:50 +03:00
parent d1fbe1c393
commit 744ba0e3ee
2 changed files with 12 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/textmodes/ispell.el
View file

@ -1723,7 +1723,11 @@ quit spell session exited."
(extent-at start)
(and (fboundp 'delete-extent)
(delete-extent (extent-at start)))))
((null poss) (message "Error in ispell process"))
((null poss)
(message "Error checking word %s using %s with %s dictionary"
(funcall ispell-format-word-function word)
(file-name-nondirectory ispell-program-name)
(or ispell-current-dictionary "default")))
(ispell-check-only ; called from ispell minor mode.
(if (fboundp 'make-extent)
(if (fboundp 'set-extent-property)
@ -3034,7 +3038,7 @@ Must call after `ispell-buffer-local-parsing' due to dependence on mode."
(while (looking-at "[ \t\n]*\\[") (forward-sexp))
(forward-sexp (or arg 1)))
(error
(message "error skipping s-expressions at point %d." (point))
(message "Error skipping s-expressions at point %d." (point))
(beep)
(sit-for 2))))