summaryrefslogtreecommitdiff
path: root/lisp/elide-head.el
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2001-01-29 17:38:03 +0000
committerDave Love <fx@gnu.org>2001-01-29 17:38:03 +0000
commitd30e6710ecd155aad24f4af5829c3b25970c8121 (patch)
treed52b1106a79dce80d15965881bb81ae0791791bf /lisp/elide-head.el
parent8e1db7b326f031f850467c54b20e0fbdc6a7bebc (diff)
downloademacs-d30e6710ecd155aad24f4af5829c3b25970c8121.tar.gz
(elide-head): Make overlay evaporate.
Diffstat (limited to 'lisp/elide-head.el')
-rw-r--r--lisp/elide-head.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/elide-head.el b/lisp/elide-head.el
index 50c77684ae5..9cd592057dc 100644
--- a/lisp/elide-head.el
+++ b/lisp/elide-head.el
@@ -106,6 +106,7 @@ This is suitable as an entry on `find-file-hooks' or appropriate mode hooks."
(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 ()