From: Glenn Morris <rgm@gnu.org>
Date: Mon, 14 Nov 2011 09:09:03 +0000 (-0800)
Subject: * mail/rmailsum.el (rmail-new-summary): Preserve message number.
X-Git-Tag: emacs-pretest-24.0.92~194
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=071c2340fd8a6018df4a370ada5429a7d47b7c9f;p=emacs.git

* mail/rmailsum.el (rmail-new-summary): Preserve message number.

Nothing was setting the local variable `mesg'.
Eg when looking at message 10, pressing h to get a summary would
send you to message 1.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 65ab83e0204..b1bdd977551 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,6 +4,8 @@
 	(executable-make-buffer-file-executable-if-script-p):
 	Handle file-modes returning nil.
 
+	* mail/rmailsum.el (rmail-new-summary): Preserve message number.
+
 	* mail/rmail.el (rmail-no-mail-p): Remove mode-line N/M indicator.
 
 	* mail/rmailsum.el (rmail-summary, rmail-new-summary)
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index b95651d3b69..70d9fc653c5 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -411,7 +411,8 @@ nil for FUNCTION means all messages."
     (with-current-buffer rmail-buffer
       (setq rmail-summary-buffer (rmail-new-summary-1 desc redo func args)
 	    ;; r-s-b is buffer-local.
-	    sumbuf rmail-summary-buffer))
+	    sumbuf rmail-summary-buffer
+	    mesg rmail-current-message))
     ;; Now display the summary buffer and go to the right place in it.
     (unless was-in-summary
       (if (and (one-window-p)