summaryrefslogtreecommitdiff
path: root/lisp/mail
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2008-12-20 21:40:38 +0000
committerChong Yidong <cyd@stupidchicken.com>2008-12-20 21:40:38 +0000
commit5e1b5cde6f62c90119af3f45c5988c64e55edee2 (patch)
tree98d91339765dc8df76b22db2de720c01c8087f5e /lisp/mail
parent8eb5f33cde01079cd225330a9983c980082882bf (diff)
downloademacs-5e1b5cde6f62c90119af3f45c5988c64e55edee2.tar.gz
(pmail): Ensure that pmail-mode-hook is run.
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/pmail.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/mail/pmail.el b/lisp/mail/pmail.el
index 76949ff95ce..b548a69ca79 100644
--- a/lisp/mail/pmail.el
+++ b/lisp/mail/pmail.el
@@ -875,6 +875,8 @@ If `pmail-display-summary' is non-nil, make a summary for this PMAIL file."
(pmail-swap-buffers-maybe)
(if (eq major-mode 'pmail-edit-mode)
(error "Exit Pmail Edit mode before getting new mail"))
+ (or (and existed (> (buffer-size) 0))
+ (setq run-mail-hook t))
;; Insure that the Rmail file is in mbox format, the buffer is in
;; Pmail mode and has been scanned to find all the messages
;; (setting the global message variables in the process).