# HG changeset patch # User Eli Zaretskii # Date 1222775601 0 # Node ID c5fb918370c813233d17cfee76a276f2c8317ee8 # Parent 3fd1ad09bae4ba056b2922d0fc123d819b615bb3 (mail-unquote-printable-region): Use insert-byte instead of insert-char, when the UNIBYTE arg is non-nil. diff -r 3fd1ad09bae4 -r c5fb918370c8 lisp/mail/mail-utils.el --- a/lisp/mail/mail-utils.el Tue Sep 30 09:01:53 2008 +0000 +++ b/lisp/mail/mail-utils.el Tue Sep 30 11:53:21 2008 +0000 @@ -141,8 +141,9 @@ (if unibyte (progn (replace-match "") - ;; insert-char will insert this as unibyte, - (insert-char char 1)) + ;; insert-byte will insert this as a + ;; corresponding eight-bit character. + (insert-byte char 1)) (replace-match (make-string 1 char) t t)))) (noerror (setq failed t))