Mercurial > emacs
changeset 29025:a4eab6bb64e0
(rmail-decode-quoted-printable): Use delete-region
and insert, not subst-char-in-region.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Sat, 20 May 2000 00:09:21 +0000 |
| parents | 5c3828858be8 |
| children | 3666bafb45c7 |
| files | lisp/mail/rmail.el |
| diffstat | 1 files changed, 4 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/rmail.el Sat May 20 00:08:10 2000 +0000 +++ b/lisp/mail/rmail.el Sat May 20 00:09:21 2000 +0000 @@ -1691,11 +1691,10 @@ (delete-char -1) (delete-char 1)) ((looking-at "[0-9A-F][0-9A-F]") - (subst-char-in-region - (1- (point)) (point) ?= - (rmail-hex-string-to-integer - (buffer-substring (point) (+ 2 (point))))) - (delete-char 2)) + (let ((byte (rmail-hex-string-to-integer + (buffer-substring (point) (+ 2 (point)))))) + (delete-region (1- (point)) (+ 2 (point))) + (insert byte))) ((looking-at "=") (delete-char 1)) (t