summaryrefslogtreecommitdiff
path: root/lisp/mail/qp.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mail/qp.el')
-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)