* lisp/outline.el (outline-flag-region): Evaporate overlays.

Fixes: debbugs:10789

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4cedbe5..14d3859 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-03-21  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * outline.el (outline-flag-region): Evaporate overlays (bug#10789).
+
        * progmodes/etags.el (tags-completion-at-point-function):
        Improve last fix.
 

diff --git a/lisp/outline.el b/lisp/outline.el
index 15af855..da5519f 100644 (file)
--- a/lisp/outline.el
+++ b/lisp/outline.el
@@ -751,6 +751,7 @@ If FLAG is nil then text is shown, while if FLAG is t the text is hidden."
     ;; very end of the heading, before the newline, so text inserted at FROM
     ;; belongs to the heading rather than to the entry.
     (let ((o (make-overlay from to nil 'front-advance)))
+      (overlay-put o 'evaporate t)
       (overlay-put o 'invisible 'outline)
       (overlay-put o 'isearch-open-invisible
                   (or outline-isearch-open-invisible-function