Commit ef0f5f7e authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(flyspell-kill-ispell-hook): New fun.

(flyspell-mode-on): Use it.
parent 2834b9b3
2006-01-15 Stefan Monnier <monnier@iro.umontreal.ca>
 
* textmodes/flyspell.el (flyspell-kill-ispell-hook): New fun.
(flyspell-mode-on): Use it.
* textmodes/ispell.el (ispell-kill-ispell): Run new hook
ispell-kill-ispell-hook.
 
......
......@@ -525,6 +525,11 @@ in your .emacs file.
(member (or ispell-local-dictionary ispell-dictionary)
flyspell-dictionaries-that-consider-dash-as-word-delimiter)))))
(defun flyspell-kill-ispell-hook ()
(setq flyspell-last-buffer nil)
(dolist (buf (buffer-list))
(kill-local-variable 'flyspell-word-cache-word)))
;;*---------------------------------------------------------------------*/
;;* flyspell-mode-on ... */
;;*---------------------------------------------------------------------*/
......@@ -536,6 +541,8 @@ in your .emacs file.
(or ispell-local-dictionary ispell-dictionary
(if flyspell-default-dictionary
(ispell-change-dictionary flyspell-default-dictionary)))
;; Make sure we flush our caches when needed.
(add-hook 'ispell-kill-ispell-hook 'flyspell-kill-ispell-hook)
;; we have to force ispell to accept the local definition or
;; otherwise it could be too late, the local dictionary may
;; be forgotten!
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment