From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 12 Jul 1994 07:15:24 +0000 (+0000)
Subject: (ispell-word): Call ispell-dehighlight.
X-Git-Tag: emacs-19.34~7632
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4638b80645e62c31911f669a7248449f21caaa44;p=emacs.git

(ispell-word): Call ispell-dehighlight.
---

diff --git a/lisp/textmodes/ispell4.el b/lisp/textmodes/ispell4.el
index 5776d2d3a28..2ee40028ceb 100644
--- a/lisp/textmodes/ispell4.el
+++ b/lisp/textmodes/ispell4.el
@@ -370,10 +370,12 @@ With a prefix argument, resume handling of the previous Ispell command."
   (if resume
       (ispell-next)
     (condition-case err
-	(catch 'ispell-quit
-	  (save-window-excursion
-	    (ispell-point (point) "at point."))
-	  (ispell-dump))
+	(unwind-protect
+	    (catch 'ispell-quit
+	      (save-window-excursion
+		(ispell-point (point) "at point."))
+	      (ispell-dump))
+	  (ispell-dehighlight))
       (ispell-startup-error
        (cond ((y-or-n-p "Problem starting ispell, use old-style spell instead? ")
 	      (load-library "spell")