# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1138391354 0
# Node ID e7649e83dff6a1a527a5dc01736c36f2295e0eb5
# Parent  f04719dff4bf8505f3cd5220b48e99004ae7a2c1
(ispell-find-aspell-dictionaries): If no English aspell dictionary is
installed, use the first entry of ispell-dictionary-alist-1.

diff -r f04719dff4bf -r e7649e83dff6 lisp/textmodes/ispell.el
--- 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)))