aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/textmodes/ispell.el8
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.
2307 2307
2308The variable `ispell-highlight-face' selects the face to use for highlighting." 2308The variable `ispell-highlight-face' selects the face to use for highlighting."
2309 (if highlight 2309 (if highlight
2310 (progn 2310 (if ispell-overlay
2311 (move-overlay ispell-overlay start end (current-buffer))
2311 (setq ispell-overlay (make-overlay start end)) 2312 (setq ispell-overlay (make-overlay start end))
2312 (overlay-put ispell-overlay 'priority 1) ;higher than lazy overlays 2313 (overlay-put ispell-overlay 'priority 1001) ;higher than lazy overlays
2313 (overlay-put ispell-overlay 'face ispell-highlight-face)) 2314 (overlay-put ispell-overlay 'face ispell-highlight-face))
2314 (delete-overlay ispell-overlay)) 2315 (if ispell-overlay
2316 (delete-overlay ispell-overlay)))
2315 (if (and ispell-lazy-highlight (boundp 'lazy-highlight-cleanup)) 2317 (if (and ispell-lazy-highlight (boundp 'lazy-highlight-cleanup))
2316 (if highlight 2318 (if highlight
2317 (let ((isearch-string 2319 (let ((isearch-string