From 6acce4eaa2408e67cc9ee79bda4dcbc02647138c Mon Sep 17 00:00:00 2001
From: Andreas Schwab <schwab@suse.de>
Date: Tue, 14 Apr 1998 13:02:50 +0000
Subject: [PATCH] (set_marker_both): Remove bogus checks on charpos.

---
 src/marker.c | 9 ---------
 1 file changed, 9 deletions(-)

diff --git a/src/marker.c b/src/marker.c
index 9806c30b5c1..0cb6d3979a1 100644
--- a/src/marker.c
+++ b/src/marker.c
@@ -621,16 +621,7 @@ set_marker_both (marker, buffer, charpos, bytepos)
   register struct Lisp_Marker *m;
 
   CHECK_MARKER (marker, 0);
-  /* If position is nil or a marker that points nowhere,
-     make this marker point nowhere.  */
-  if (NILP (charpos)
-      || (MARKERP (charpos) && !XMARKER (charpos)->buffer))
-    {
-      unchain_marker (marker);
-      return marker;
-    }
 
-  CHECK_NUMBER_COERCE_MARKER (charpos, 1);
   if (NILP (buffer))
     b = current_buffer;
   else
-- 
2.39.2