[Emacs-diffs] Changes to emacs/lisp/textmodes/ispell.el

[Juri Linkov]

Index: emacs/lisp/textmodes/ispell.el
diff -c emacs/lisp/textmodes/ispell.el:1.184 
emacs/lisp/textmodes/ispell.el:1.185
*** emacs/lisp/textmodes/ispell.el:1.184        Thu Nov  3 21:34:12 2005
--- emacs/lisp/textmodes/ispell.el      Fri Dec  9 09:47:30 2005
***************
*** 2307,2317 ****
  
  The variable `ispell-highlight-face' selects the face to use for 
highlighting."
    (if highlight
!       (progn
        (setq ispell-overlay (make-overlay start end))
!       (overlay-put ispell-overlay 'priority 1) ;higher than lazy overlays
        (overlay-put ispell-overlay 'face ispell-highlight-face))
!     (delete-overlay ispell-overlay))
    (if (and ispell-lazy-highlight (boundp 'lazy-highlight-cleanup))
        (if highlight
          (let ((isearch-string
--- 2307,2319 ----
  
  The variable `ispell-highlight-face' selects the face to use for 
highlighting."
    (if highlight
!       (if ispell-overlay
!         (move-overlay ispell-overlay start end (current-buffer))
        (setq ispell-overlay (make-overlay start end))
!       (overlay-put ispell-overlay 'priority 1001) ;higher than lazy overlays
        (overlay-put ispell-overlay 'face ispell-highlight-face))
!     (if ispell-overlay
!       (delete-overlay ispell-overlay)))
    (if (and ispell-lazy-highlight (boundp 'lazy-highlight-cleanup))
        (if highlight
          (let ((isearch-string