Mercurial > emacs
changeset 89476:651a752f98b2
(utf-7-decode, utf-7-encode): Use utf-16be, not utf-16-be.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Sun, 22 Jun 2003 23:27:26 +0000 |
| parents | d6468503c001 |
| children | 3fbea8672973 |
| files | lisp/international/utf-7.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/utf-7.el Sun Jun 22 23:27:03 2003 +0000 +++ b/lisp/international/utf-7.el Sun Jun 22 23:27:26 2003 +0000 @@ -78,7 +78,7 @@ (if imap (subst-char-in-region p (point) ?, ?/)) (base64-decode-region p (point))) - (decode-coding-region p (point) 'utf-16-be) + (decode-coding-region p (point) 'utf-16be) (save-excursion (goto-char p) (delete-backward-char 1))))))) @@ -120,7 +120,7 @@ (save-restriction ;; encode-coding-region doesn't preserve point (narrow-to-region p (point)) - (encode-coding-region p (point-max) 'utf-16-be) + (encode-coding-region p (point-max) 'utf-16be) (base64-encode-region p (point-max)) (if imap (subst-char-in-region p (point-max) ?/ ?,))