Mercurial > emacs

changeset 68426:e7649e83dff6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ispell-find-aspell-dictionaries): If no English aspell dictionary is installed, use the first entry of ispell-dictionary-alist-1.
author Eli Zaretskii <eliz@gnu.org>
date Fri, 27 Jan 2006 19:49:14 +0000
parents f04719dff4bf
children 57575786f53a
files lisp/textmodes/ispell.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/ispell.el	Fri Jan 27 19:46:43 2006 +0000
+++ b/lisp/textmodes/ispell.el	Fri Jan 27 19:49:14 2006 +0000
@@ -913,7 +913,9 @@
     (ispell-aspell-add-aliases)
     ;; Add a default entry
     (let* ((english-dict (assoc "en" ispell-dictionary-alist))
-	   (default-dict (cons nil (cdr english-dict))))
+	   (default-dict
+	     (cons nil (or (cdr english-dict)
+			   (cdr (car ispell-dictionary-alist-1))))))
       (push default-dict ispell-dictionary-alist))
     (setq ispell-have-aspell-dictionaries t)))