Mercurial > emacs
changeset 60283:e55f542ec767
(flyspell-mode-on): Call ispell-change-dictionary only if necessary.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 27 Feb 2005 10:36:38 +0000 |
| parents | b6fcc94c2d6a |
| children | 196128d3d9e8 |
| files | lisp/textmodes/flyspell.el |
| diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/flyspell.el Sun Feb 27 10:35:51 2005 +0000 +++ b/lisp/textmodes/flyspell.el Sun Feb 27 10:36:38 2005 +0000 @@ -543,8 +543,9 @@ "Turn Flyspell mode on. Do not use this; use `flyspell-mode' instead." (setq ispell-highlight-face 'flyspell-incorrect-face) ;; local dictionaries setup - (ispell-change-dictionary - (or ispell-local-dictionary ispell-dictionary flyspell-default-dictionary)) + (or ispell-local-dictionary ispell-dictionary + (if flyspell-default-dictionary + (ispell-change-dictionary flyspell-default-dictionary))) ;; we have to force ispell to accept the local definition or ;; otherwise it could be too late, the local dictionary may ;; be forgotten!