aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorAgustín Martín2009-01-20 11:34:39 +0000
committerAgustín Martín2009-01-20 11:34:39 +0000
commit8e56b4645a44f32653296eba52b9e780f07a0bca (patch)
tree0aee88f9207e22ff9c379bfee327aa740eac508a /lisp/textmodes
parentd35fdb5bb10bdcacb108f8fcd72563e85a24f878 (diff)
downloademacs-8e56b4645a44f32653296eba52b9e780f07a0bca.tar.gz
emacs-8e56b4645a44f32653296eba52b9e780f07a0bca.zip
(ispell-find-aspell-dictionaries): Use aspell default dict.
Diffstat (limited to 'lisp/textmodes')
-rw-r--r--lisp/textmodes/ispell.el5
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 49b6bee1258..21ae997bb52 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -937,10 +937,7 @@ Internal use.")
937 (setq found (nconc found (list dict))))) 937 (setq found (nconc found (list dict)))))
938 (setq ispell-aspell-dictionary-alist found) 938 (setq ispell-aspell-dictionary-alist found)
939 ;; Add a default entry 939 ;; Add a default entry
940 (let* ((english-dict (assoc "en" ispell-aspell-dictionary-alist)) 940 (let ((default-dict '(nil "[[:alpha:]]" "[^[:alpha:]]" "[']" nil ("-B") nil utf-8)))
941 (default-dict
942 (cons nil (or (cdr english-dict)
943 '("[[:alpha:]]" "[^[:alpha:]]" "[']" nil ("-B") nil utf-8)))))
944 (push default-dict ispell-aspell-dictionary-alist)))) 941 (push default-dict ispell-aspell-dictionary-alist))))
945 942
946(defvar ispell-aspell-data-dir nil 943(defvar ispell-aspell-data-dir nil