[Emacs-diffs] /srv/bzr/emacs/trunk r106287: Fix rmail-next/prev-same-subject.

[Eli Zaretskii]

------------------------------------------------------------
revno: 106287
committer: Eli Zaretskii <address@hidden>
branch nick: trunk
timestamp: Sat 2011-11-05 00:07:12 +0200
message:
  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.
modified:
  lisp/ChangeLog
  lisp/mail/rmail.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-11-04 10:09:41 +0000
+++ b/lisp/ChangeLog    2011-11-04 22:07:12 +0000
@@ -1,5 +1,10 @@
 2011-11-04  Eli Zaretskii  <address@hidden>
 
+       * 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)

=== modified file 'lisp/mail/rmail.el'
--- a/lisp/mail/rmail.el        2011-10-28 02:47:43 +0000
+++ b/lisp/mail/rmail.el        2011-11-04 22:07:12 +0000
@@ -194,6 +194,7 @@
 
 (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 @@
 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)