diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-13 01:43:58 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-13 01:43:58 +0200 |
| commit | d16b73fb4a9d87ec220444d220c6b45879806fc0 (patch) | |
| tree | ca8ca6c5544ec2b335e3da4b830f3308c41557a9 /lisp | |
| parent | 982af7f516efb190d19946bff7bb37567328b4b9 (diff) | |
| download | emacs-d16b73fb4a9d87ec220444d220c6b45879806fc0.tar.gz | |
Fix compilation warning in qp.el
* lisp/mail/qp.el (quoted-printable-encode-region): No need to
convert the regexp to multibyte before searching.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mail/qp.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mail/qp.el b/lisp/mail/qp.el index 5b497411886..803d78602e5 100644 --- a/lisp/mail/qp.el +++ b/lisp/mail/qp.el @@ -115,8 +115,7 @@ encode lines starting with \"From\"." (setq class "\010-\012\014\040-\074\076-\177")) (save-excursion (goto-char from) - (if (re-search-forward (string-to-multibyte "[^\x0-\x7f\x80-\xff]") - to t) + (if (re-search-forward "[^\x0-\x7f\x80-\xff]" to t) (error "Multibyte character in QP encoding region")) (save-restriction (narrow-to-region from to) |