diff options
author | Andreas Schwab <schwab@suse.de> | 1998-04-14 13:02:50 +0000 |
---|---|---|
committer | Andreas Schwab <schwab@suse.de> | 1998-04-14 13:02:50 +0000 |
commit | 6acce4eaa2408e67cc9ee79bda4dcbc02647138c (patch) | |
tree | 58ff887bde80a098fd8e6c62b5c3465591068755 /src/marker.c | |
parent | d52a7a92631eb442c97bec9880d881871858c8ea (diff) | |
download | emacs-6acce4eaa2408e67cc9ee79bda4dcbc02647138c.tar.gz |
(set_marker_both): Remove bogus checks on charpos.
Diffstat (limited to 'src/marker.c')
-rw-r--r-- | src/marker.c | 9 |
1 files changed, 0 insertions, 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 |