changeset 21528:cabecb23d48c

(set_marker_both): Remove bogus checks on charpos.
author Andreas Schwab <schwab@suse.de>
date Tue, 14 Apr 1998 13:02:50 +0000
parents 39c919d2a8be
children 8c50610fbb99
files src/marker.c
diffstat 1 files changed, 0 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/src/marker.c	Tue Apr 14 13:01:59 1998 +0000
+++ b/src/marker.c	Tue Apr 14 13:02:50 1998 +0000
@@ -621,16 +621,7 @@
   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