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)))