From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 4 Nov 2011 22:07:12 +0000 (+0200)
Subject: Fix rmail-next/prev-same-subject.
X-Git-Tag: emacs-pretest-24.0.92~218^2~21
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=53479029f7a5e0391766bdd6c4008353924a7740;p=emacs.git

Fix rmail-next/prev-same-subject.

 lisp/mail/rmail.el (rmail-simplified-subject): Decode subject with
 rfc2047-decode-string.
 (rmail-mime-toggle-hidden): Declare to avoid byte-compilation
 warnings.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eb276721dbc..ab409e10003 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 2011-11-04  Eli Zaretskii  <eliz@gnu.org>
 
+	* mail/rmail.el (rmail-simplified-subject): Decode subject with
+	rfc2047-decode-string.
+	(rmail-mime-toggle-hidden): Declare to avoid byte-compilation
+	warnings.
+
 	* window.el (window-body-height, window-body-width): Mention in
 	the doc string that the return values are in frame's canonical
 	units.  (Bug#9949)
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 603a615192a..a535d3a86db 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -194,6 +194,7 @@ please report it with \\[report-emacs-bug].")
 
 (declare-function mail-dont-reply-to "mail-utils" (destinations))
 (declare-function rmail-update-summary "rmailsum" (&rest ignore))
+(declare-function rmail-mime-toggle-hidden "rmailmm" ())
 
 (defun rmail-probe (prog)
   "Determine what flavor of movemail PROG is.
@@ -3262,6 +3263,7 @@ Interactively, empty argument means use same regexp used last time."
 Simplifying the subject means stripping leading and trailing whitespace,
 and typical reply prefixes such as Re:."
   (let ((subject (or (rmail-get-header "Subject" msgnum) "")))
+    (setq subject (rfc2047-decode-string subject))
     (if (string-match "\\`[ \t]+" subject)
 	(setq subject (substring subject (match-end 0))))
     (if (string-match rmail-reply-regexp subject)