(mail-decode-encoded-word-region): Use `mime-decode-header-in-region'.

diff --git a/lisp/mail-parse.el b/lisp/mail-parse.el
index c93b890..e9c39e5 100644 (file)
--- a/lisp/mail-parse.el
+++ b/lisp/mail-parse.el
@@ -62,7 +62,8 @@
 (defalias 'mail-encode-encoded-word-region 'rfc2047-encode-region)
 (defalias 'mail-encode-encoded-word-buffer 'rfc2047-encode-message-header)
 (defalias 'mail-encode-encoded-word-string 'rfc2047-encode-string)
-(defalias 'mail-decode-encoded-word-region 'rfc2047-decode-region)
+(defun mail-decode-encoded-word-region (beg end)
+  (mime-decode-header-in-region beg end t))
 (defalias 'mail-decode-encoded-word-string 'rfc2047-decode-string)
 
 (provide 'mail-parse)