Mercurial > emacs

diff lisp/textmodes/=ispell4.el @ 8221:0b9e18f9b085

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ispell-word): Call ispell-dehighlight.
author Richard M. Stallman <rms@gnu.org>
date Tue, 12 Jul 1994 07:15:24 +0000
parents f152f2b276c5
children ace71f0fc661
line wrap: on
line diff
--- a/lisp/textmodes/=ispell4.el	Tue Jul 12 07:08:31 1994 +0000
+++ b/lisp/textmodes/=ispell4.el	Tue Jul 12 07:15:24 1994 +0000
@@ -370,10 +370,12 @@
   (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")