From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 10 Sep 1998 16:05:59 +0000 (+0000)
Subject: (flyspell-mode-on): fix kill-buffer-hook
X-Git-Tag: emacs-20.4~1716
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b2a577ecba1690db0f631f5fcf514685a7be06aa;p=emacs.git

(flyspell-mode-on): fix kill-buffer-hook
to make killing of ispell process work even if
kill-all-local-variables has been run.
---

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 43ddf8bea73..cae3fb76c98 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -344,8 +344,8 @@ flyspell-buffer checks the whole buffer."
   ;; improvement).
   (add-hook 'kill-buffer-hook
 	    '(lambda ()
-	       (if flyspell-mode
-		   (flyspell-mode-off))))
+	       (if (and flyspell-multi-language-p ispell-process)
+		   (ispell-kill-ispell t))))
   ;; we end with the flyspell hooks
   (run-hooks 'flyspell-mode-hook))