diff options
| author | Glenn Morris <[email protected]> | 2011-11-14 01:09:03 -0800 |
|---|---|---|
| committer | Glenn Morris <[email protected]> | 2011-11-14 01:09:03 -0800 |
| commit | 071c2340fd8a6018df4a370ada5429a7d47b7c9f (patch) | |
| tree | 92da29cc01b20a2071a82ee9cca3dcf5d3833cb6 | |
| parent | 09e80d9fb9fe7239d0fa301973920845831366d3 (diff) | |
* 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.
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/mail/rmailsum.el | 3 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 65ab83e020..b1bdd97755 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 b95651d3b6..70d9fc653c 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) |