aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2011-11-14 01:22:45 -0800
committerGlenn Morris2011-11-14 01:22:45 -0800
commit40500957d93dfce9fa852791bd56a737e577f245 (patch)
tree3547d64689fcf9f625738ab106b90a09e804257e
parent071c2340fd8a6018df4a370ada5429a7d47b7c9f (diff)
downloademacs-40500957d93dfce9fa852791bd56a737e577f245.tar.gz
emacs-40500957d93dfce9fa852791bd56a737e577f245.zip
rmail-summary fix.
* lisp/mail/rmailsum.el (rmail-summary): Remove movement to beginning of message - not necessary, and causes problems. I believe the call to rmail-summary-beginning-of-message was only thought to be necessary due to a couple of bugs in rmail-new-summary that are hopefully fixed now (`mesg' not being set, rmail-summary-buffer's buffer locality not being considered). Fixes: debbugs:9831
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/mail/rmailsum.el5
2 files changed, 4 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b1bdd977551..37b13a7acd8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,6 +4,9 @@
4 (executable-make-buffer-file-executable-if-script-p): 4 (executable-make-buffer-file-executable-if-script-p):
5 Handle file-modes returning nil. 5 Handle file-modes returning nil.
6 6
7 * mail/rmailsum.el (rmail-summary): Remove movement to beginning of
8 message - not necessary, and causes problems. (Bug#9831)
9
7 * mail/rmailsum.el (rmail-new-summary): Preserve message number. 10 * mail/rmailsum.el (rmail-new-summary): Preserve message number.
8 11
9 * mail/rmail.el (rmail-no-mail-p): Remove mode-line N/M indicator. 12 * mail/rmail.el (rmail-no-mail-p): Remove mode-line N/M indicator.
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 70d9fc653c5..a3f722443dc 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -268,10 +268,7 @@ Setting this option to nil might speed up the generation of summaries."
268(defun rmail-summary () 268(defun rmail-summary ()
269 "Display a summary of all messages, one line per message." 269 "Display a summary of all messages, one line per message."
270 (interactive) 270 (interactive)
271 (rmail-new-summary "All" '(rmail-summary) nil) 271 (rmail-new-summary "All" '(rmail-summary) nil))
272 (unless (or (zerop (buffer-size)) ; empty summary
273 (get-buffer-window rmail-buffer))
274 (rmail-summary-beginning-of-message)))
275 272
276;;;###autoload 273;;;###autoload
277(defun rmail-summary-by-labels (labels) 274(defun rmail-summary-by-labels (labels)