(flyspell-mode-on): Call ispell-change-dictionary only if necessary.

This commit is contained in:
Richard M. Stallman 2005-02-27 10:36:38 +00:00
parent e342a48a65
commit 8ceb0c6ea9

View file

@ -543,8 +543,9 @@ in your .emacs file.
"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!