From 967a91b21d9a27126d6c3b045dccf574d2b38f80 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 27 Jan 2006 19:49:14 +0000 Subject: [PATCH] (ispell-find-aspell-dictionaries): If no English aspell dictionary is installed, use the first entry of ispell-dictionary-alist-1. --- lisp/textmodes/ispell.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 5b5e748af74..3bf608c2cc0 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -913,7 +913,9 @@ and added as a submenu of the \"Edit\" menu.") (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))) -- 2.39.2