diff --git a/lisp/mail/rfc6068.el b/lisp/mail/rfc6068.el index 8f0b4234410..cfa51196000 100644 --- a/lisp/mail/rfc6068.el +++ b/lisp/mail/rfc6068.el @@ -39,7 +39,8 @@ string instead of decoding as utf-8." (buffer-string)))) (if inhibit-decode string - (decode-coding-string string 'utf-8)))) + (let (inhibit-eol-conversion) + (decode-coding-string string 'utf-8-dos))))) (defun rfc6068-parse-mailto-url (mailto-url) "Parse MAILTO-URL, and return an alist of header-name, header-value pairs.