mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 09:14:18 +00:00
Make quoted-printable-encode-region work in multibyte buffers
* lisp/mail/qp.el (quoted-printable-encode-region): If we're in a multibyte buffer (that has been encoded with some coding system), then get-byte will get the correct byte value.
This commit is contained in:
parent
e63705ab9b
commit
a0d3d2935f
1 changed files with 2 additions and 2 deletions
|
|
@ -125,7 +125,7 @@ encode lines starting with \"From\"."
|
|||
(not (eobp)))
|
||||
(insert
|
||||
(prog1
|
||||
(format "=%02X" (char-after))
|
||||
(format "=%02X" (get-byte))
|
||||
(delete-char 1))))
|
||||
;; Encode white space at the end of lines.
|
||||
(goto-char (point-min))
|
||||
|
|
@ -134,7 +134,7 @@ encode lines starting with \"From\"."
|
|||
(while (not (eolp))
|
||||
(insert
|
||||
(prog1
|
||||
(format "=%02X" (char-after))
|
||||
(format "=%02X" (get-byte))
|
||||
(delete-char 1)))))
|
||||
(let ((ultra
|
||||
(and (boundp 'mm-use-ultra-safe-encoding)
|
||||
|
|
|
|||
Loading…
Reference in a new issue