# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 738277052 0
# Node ID 5c96dfc5243305e411cbbe4e3b93864973ce73b5
# Parent  2c5ea1c9825656ef2b746da83a027b20cf76c883
	* buffer.c (Fmake_overlay): Put beg and end in the
	right order.
	(Fmove_overlay): If beg and end are markers, make sure they're in
	the right buffer.

diff -r 2c5ea1c98256 -r 5c96dfc52433 src/buffer.c
--- a/src/buffer.c	Mon May 24 19:54:15 1993 +0000
+++ b/src/buffer.c	Mon May 24 20:57:32 1993 +0000
@@ -1489,28 +1489,28 @@
 
   if (NILP (buffer))
     XSET (buffer, Lisp_Buffer, current_buffer);
-  CHECK_BUFFER (buffer, 2);
+  else
+    CHECK_BUFFER (buffer, 2);
+  if (MARKERP (beg)
+      && ! EQ (Fmarker_buffer (beg), buffer))
+    error ("Marker points into wrong buffer");
+  if (MARKERP (end)
+      && ! EQ (Fmarker_buffer (end), buffer))
+    error ("Marker points into wrong buffer");
+
+  CHECK_NUMBER_COERCE_MARKER (beg, 1);
+  CHECK_NUMBER_COERCE_MARKER (end, 1);
+
+  if (XINT (beg) > XINT (end))
+    {
+      Lisp_Object temp = beg;
+      beg = end; end = temp;
+    }
 
   b = XBUFFER (buffer);
 
-  if (MARKERP (beg))
-    {
-      if (! EQ (Fmarker_buffer (beg), buffer))
-	error ("Marker points into wrong buffer");
-      else
-	beg = Fcopy_marker (beg);
-    }
-  else
-    beg = Fset_marker (Fmake_marker (), beg, buffer);
-  if (MARKERP (end))
-    {
-      if (! EQ (Fmarker_buffer (end), buffer))
-	error ("Marker points into wrong buffer");
-      else
-	end = Fcopy_marker (end);
-    }
-  else
-    end = Fset_marker (Fmake_marker (), end, buffer);
+  beg = Fset_marker (Fmake_marker (), beg, buffer);
+  end = Fset_marker (Fmake_marker (), end, buffer);
 
   overlay = Fcons (Fcons (beg, end), Qnil);
   XSETTYPE (overlay, Lisp_Overlay);
@@ -1547,6 +1547,14 @@
   if (NILP (buffer))
     XSET (buffer, Lisp_Buffer, current_buffer);
   CHECK_BUFFER (buffer, 3);
+
+  if (MARKERP (beg)
+      && ! EQ (Fmarker_buffer (beg), buffer))
+    error ("Marker points into wrong buffer");
+  if (MARKERP (end)
+      && ! EQ (Fmarker_buffer (end), buffer))
+    error ("Marker points into wrong buffer");
+
   CHECK_NUMBER_COERCE_MARKER (beg, 1);
   CHECK_NUMBER_COERCE_MARKER (end, 1);