From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 26 Mar 1997 06:05:58 +0000 (+0000)
Subject: (outline-discard-overlays): Fix the case
X-Git-Tag: emacs-20.1~2697
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=48cbe093bb7843d7ef1f19314fd7666a4688d460;p=emacs.git

(outline-discard-overlays): Fix the case
where an overlay extends on both sides of the region.
---

diff --git a/lisp/textmodes/outline.el b/lisp/textmodes/outline.el
index 6116c8116da..3b7ae6c076d 100644
--- a/lisp/textmodes/outline.el
+++ b/lisp/textmodes/outline.el
@@ -397,7 +397,8 @@ If FLAG is nil then text is shown, while if FLAG is t the text is hidden."
 		  (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)))))