diff options
Diffstat (limited to 'lisp/mail/qp.el')
| -rw-r--r-- | lisp/mail/qp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/qp.el b/lisp/mail/qp.el index 35ff47fd098..10ac696fecf 100644 --- a/lisp/mail/qp.el +++ b/lisp/mail/qp.el @@ -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) |