Mercurial > emacs
changeset 99698:efc1b0dc2c12
(ispell-dictionary-base-alist): Adjust to the
case where the default dictionary is French, Spanish, younameit.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 18 Nov 2008 21:42:17 +0000 |
| parents | 4d2232791f45 |
| children | 22eac3bb86e2 |
| files | lisp/ChangeLog lisp/textmodes/ispell.el |
| diffstat | 2 files changed, 9 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Tue Nov 18 20:45:21 2008 +0000 +++ b/lisp/ChangeLog Tue Nov 18 21:42:17 2008 +0000 @@ -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):
--- a/lisp/textmodes/ispell.el Tue Nov 18 20:45:21 2008 +0000 +++ b/lisp/textmodes/ispell.el Tue Nov 18 21:42:17 2008 +0000 @@ -506,8 +506,12 @@ (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