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:
parent
d52a7a9263
commit
6acce4eaa2
1 changed files with 0 additions and 9 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue