From: Stefan Monnier Date: Tue, 18 Nov 2008 21:42:17 +0000 (+0000) Subject: (ispell-dictionary-base-alist): Adjust to the X-Git-Tag: emacs-pretest-23.0.90~1712 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a1e34e711defe77e4cc9ae5f01addc3880d30ac1;p=emacs.git (ispell-dictionary-base-alist): Adjust to the case where the default dictionary is French, Spanish, younameit. --- 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 + * 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