diff options
| author | Dave Love <fx@gnu.org> | 2000-02-02 14:27:03 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2000-02-02 14:27:03 +0000 |
| commit | a66399e36da3dc17ec0f8402c629061436cd2a6b (patch) | |
| tree | 06faa0ea09b93554e27516b100bc7d4e1227c34a /lisp/elide-head.el | |
| parent | 8bfeec5e0ea8d6a08e320f4925c6b5653c3bc428 (diff) | |
| download | emacs-a66399e36da3dc17ec0f8402c629061436cd2a6b.tar.gz | |
(elide-head): Use point-marker more.
Diffstat (limited to 'lisp/elide-head.el')
| -rw-r--r-- | lisp/elide-head.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/elide-head.el b/lisp/elide-head.el index cdf72ddda6b..50c77684ae5 100644 --- a/lisp/elide-head.el +++ b/lisp/elide-head.el @@ -103,7 +103,7 @@ This is suitable as an entry on `find-file-hooks' or appropriate mode hooks." (end-of-line) (if (overlayp elide-head-overlay) (move-overlay elide-head-overlay (point-marker) end) - (setq elide-head-overlay (make-overlay (point) end))) + (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 'after-string "..."))))))) |