# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 905443559 0
# Node ID b31869394e035b52a1f6df442c205a0a39228ee2
# Parent  97332957a969729c4f16388d89a6243039eb5857
(flyspell-mode-on): fix kill-buffer-hook
to make killing of ispell process work even if
kill-all-local-variables has been run.

diff -r 97332957a969 -r b31869394e03 lisp/textmodes/flyspell.el
--- a/lisp/textmodes/flyspell.el	Thu Sep 10 16:03:07 1998 +0000
+++ b/lisp/textmodes/flyspell.el	Thu Sep 10 16:05:59 1998 +0000
@@ -344,8 +344,8 @@
   ;; 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))