From: Eli Zaretskii <eliz@gnu.org>
Date: Tue, 30 Sep 2008 11:54:57 +0000 (+0000)
Subject: (mail-unquote-printable-region): Use insert-byte instead of insert-char,
X-Git-Tag: emacs-pretest-23.0.90~2716
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f45de83bf8fd3d3a475e77afff4dee434400187e;p=emacs.git

(mail-unquote-printable-region): Use insert-byte instead of insert-char,
when the UNIBYTE arg is non-nil.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 189eb553ebd..0cc37745e43 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2008-09-30  Eli Zaretskii  <eliz@gnu.org>
+
+	* mail/mail-utils.el (mail-unquote-printable-region): Use
+	insert-byte instead of insert-char, when the UNIBYTE arg is
+	non-nil.
+
 2008-09-30  Daiki Ueno  <ueno@unixuser.org>
 
 	* epa-file.el (epa-file-insert-file-contents): Fix typo.
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))