# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 980789883 0
# Node ID 96fb197c6aff4c4880bf7470697d6ca206c0c223
# Parent  b6a758475262e7a5f14f47b47c614a0f98e4ff93
(elide-head): Make overlay evaporate.

diff -r b6a758475262 -r 96fb197c6aff lisp/elide-head.el
--- a/lisp/elide-head.el	Mon Jan 29 17:07:38 2001 +0000
+++ b/lisp/elide-head.el	Mon Jan 29 17:38:03 2001 +0000
@@ -106,6 +106,7 @@
 	      (setq elide-head-overlay (make-overlay (point-marker) end)))
 	    (overlay-put elide-head-overlay 'invisible t)
 	    (overlay-put elide-head-overlay 'intangible t)
+	    (overlay-put elide-head-overlay 'evaporate t)
 	    (overlay-put elide-head-overlay 'after-string "...")))))))
 
 (defun elide-head-show ()