summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/textmodes/ispell.el8
2 files changed, 9 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 44592db06ac..6b4cbf0e11c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
2008-11-18 Stefan Monnier <monnier@iro.umontreal.ca>
+ * textmodes/ispell.el (ispell-dictionary-base-alist): Adjust to the
+ case where the default dictionary is French, Spanish, younameit.
+
* window.el (window--frame-usable-p): Consider dedicated windows as usable.
* files.el (confirm-nonexistent-file-or-buffer):
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index ff5cb5ec0c9..7ccaba73d72 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -506,8 +506,12 @@ re-start Emacs."
(defvar ispell-dictionary-base-alist
- '((nil ; default (English.aff)
- "[A-Za-z]" "[^A-Za-z]" "[']" nil ("-B") nil iso-8859-1)
+ '((nil
+ ;; The default dictionary. It may be English.aff, or any other
+ ;; dictionary depending on locale and such things. We should probably
+ ;; ask ispell what dictionary it's using, but until we do that, let's
+ ;; just use an approximate regexp.
+ "[[:alpha:]]" "[^[:alpha:]]" "[']" nil ("-B") nil iso-8859-1)
("american" ; Yankee English
"[A-Za-z]" "[^A-Za-z]" "[']" nil ("-B") nil iso-8859-1)
("brasileiro" ; Brazilian mode