Mercurial > emacs
changeset 105643:062d17ee6c05
Jari Aalto <jari.aalto at cante.net>
(ispell-get-decoded-string): Give an error if no match is found for
the current dictionary. (Bug#4578)
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Sat, 17 Oct 2009 03:09:25 +0000 |
parents | 5baebf489b9e |
children | 4c1014e9a8e3 |
files | lisp/textmodes/ispell.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/ispell.el Sat Oct 17 03:08:56 2009 +0000 +++ b/lisp/textmodes/ispell.el Sat Oct 17 03:09:25 2009 +0000 @@ -1289,7 +1289,8 @@ (defun ispell-get-decoded-string (n) (let* ((slot (or (assoc ispell-current-dictionary ispell-local-dictionary-alist) - (assoc ispell-current-dictionary ispell-dictionary-alist))) + (assoc ispell-current-dictionary ispell-dictionary-alist) + (error "No match for the current dictionary"))) (str (nth n slot))) (when (and (> (length str) 0) (not (multibyte-string-p str)))