diff options
Diffstat (limited to 'src/marker.c')
| -rw-r--r-- | src/marker.c | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/src/marker.c b/src/marker.c index 2c09b8e19a2..a059987aa51 100644 --- a/src/marker.c +++ b/src/marker.c @@ -667,14 +667,8 @@ set_marker_restricted_both (Lisp_Object marker, Lisp_Object buffer, ptrdiff_t ch } } - if (charpos < BUF_BEGV (b)) - charpos = BUF_BEGV (b); - if (charpos > BUF_ZV (b)) - charpos = BUF_ZV (b); - if (bytepos < BUF_BEGV_BYTE (b)) - bytepos = BUF_BEGV_BYTE (b); - if (bytepos > BUF_ZV_BYTE (b)) - bytepos = BUF_ZV_BYTE (b); + charpos = clip_to_bounds (BUF_BEGV (b), charpos, BUF_ZV (b)); + bytepos = clip_to_bounds (BUF_BEGV_BYTE (b), bytepos, BUF_ZV_BYTE (b)); /* In a single-byte buffer, the two positions must be equal. */ if (BUF_Z (b) == BUF_Z_BYTE (b) |