1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 16:21:07 -08:00

(set_marker_both): Remove bogus checks on charpos.

This commit is contained in:
Andreas Schwab 1998-04-14 13:02:50 +00:00
parent d52a7a9263
commit 6acce4eaa2

View file

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