procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(ispell-find-aspell-dictionaries): If no English aspell dictionary is

Browse source 
installed, use the first entry of ispell-dictionary-alist-1.
This commit is contained in:
Eli Zaretskii 2006-01-27 19:49:14 +00:00
parent f9fe3e26c0
commit 967a91b21d
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/textmodes/ispell.el
View file

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