(mail-unquote-printable-region): Use insert-byte instead of insert-char,

when the UNIBYTE arg is non-nil.

1 files changed, 3 insertions, 2 deletions

diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el
index 7c8593742e7..c26ec78c0be 100644
--- a/lisp/mail/mail-utils.el
+++ b/lisp/mail/mail-utils.el
@@ -141,8 +141,9 @@ as Rmail does."
                      (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))