(outline-discard-overlays): Fix the case

where an overlay extends on both sides of the region.

1 files changed, 2 insertions, 1 deletions

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