(ispell-highlight-spelling-error-overlay):

Change overlay priority from 1 to 1001.  Reuse existing overlay.

1 files changed, 5 insertions, 3 deletions

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 99bcc621765..9e81c224855 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -2307,11 +2307,13 @@ otherwise it is displayed normally.
 
 The variable `ispell-highlight-face' selects the face to use for highlighting."
   (if highlight
-      (progn
+      (if ispell-overlay
+          (move-overlay ispell-overlay start end (current-buffer))
         (setq ispell-overlay (make-overlay start end))
-        (overlay-put ispell-overlay 'priority 1) ;higher than lazy overlays
+        (overlay-put ispell-overlay 'priority 1001) ;higher than lazy overlays
         (overlay-put ispell-overlay 'face ispell-highlight-face))
-    (delete-overlay ispell-overlay))
+    (if ispell-overlay
+        (delete-overlay ispell-overlay)))
   (if (and ispell-lazy-highlight (boundp 'lazy-highlight-cleanup))
       (if highlight
           (let ((isearch-string