Mercurial > emacs
changeset 17248:cf25d78ebd75
(outline-discard-overlays): Fix the case
where an overlay extends on both sides of the region.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 26 Mar 1997 06:05:58 +0000 |
parents | 351006378b51 |
children | 2dfc334bdc6f |
files | lisp/textmodes/outline.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/outline.el Tue Mar 25 03:52:53 1997 +0000 +++ b/lisp/textmodes/outline.el Wed Mar 26 06:05:58 1997 +0000 @@ -397,7 +397,8 @@ (if (> (overlay-end o) end) (let ((o1 (outline-copy-overlay o))) (move-overlay o1 (overlay-start o1) beg) - (move-overlay o (overlay-start o) beg))) + (move-overlay o end (overlay-end o))) + (move-overlay o (overlay-start o) beg)) (if (> (overlay-end o) end) (move-overlay o end (overlay-end o)) (delete-overlay o)))))