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)))))