summaryrefslogtreecommitdiff
path: root/lisp/mail
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-06-13 01:43:58 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-06-13 01:43:58 +0200
commitd16b73fb4a9d87ec220444d220c6b45879806fc0 (patch)
treeca8ca6c5544ec2b335e3da4b830f3308c41557a9 /lisp/mail
parent982af7f516efb190d19946bff7bb37567328b4b9 (diff)
downloademacs-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/mail')
-rw-r--r--lisp/mail/qp.el3
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)