Mercurial > emacs
comparison src/fns.c @ 25607:e1f5592218c1
(Fbase64_decode_region): Don't place point outside of the
current accessible portion.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 08 Sep 1999 07:54:18 +0000 |
parents | b01b1c94f6ee |
children | f25a14690a18 |
comparison
equal
deleted
inserted
replaced
25606:7ab723e4a21a | 25607:e1f5592218c1 |
---|---|
3138 move to the beginning of the region. */ | 3138 move to the beginning of the region. */ |
3139 if (old_pos >= XFASTINT (end)) | 3139 if (old_pos >= XFASTINT (end)) |
3140 old_pos += inserted_chars - (XFASTINT (end) - XFASTINT (beg)); | 3140 old_pos += inserted_chars - (XFASTINT (end) - XFASTINT (beg)); |
3141 else if (old_pos > XFASTINT (beg)) | 3141 else if (old_pos > XFASTINT (beg)) |
3142 old_pos = XFASTINT (beg); | 3142 old_pos = XFASTINT (beg); |
3143 SET_PT (old_pos); | 3143 SET_PT (old_pos > ZV ? ZV : old_pos); |
3144 | 3144 |
3145 return make_number (inserted_chars); | 3145 return make_number (inserted_chars); |
3146 } | 3146 } |
3147 | 3147 |
3148 DEFUN ("base64-decode-string", Fbase64_decode_string, Sbase64_decode_string, | 3148 DEFUN ("base64-decode-string", Fbase64_decode_string, Sbase64_decode_string, |