# HG changeset patch
# User Paul Reilly <pmr@pajato.com>
# Date 1220642916 0
# Node ID bccc81ffd08f3388cae24f70a7d15d957f383dad
# Parent  c5c3ca209572ff07501c6580c1cc2b96b40ab331
* pmail.el (pmail-get-new-mail): When there are no new messages,
  invoke a redisplay of the current message.

diff -r c5c3ca209572 -r bccc81ffd08f lisp/mail/pmail.el
--- a/lisp/mail/pmail.el	Fri Sep 05 17:30:10 2008 +0000
+++ b/lisp/mail/pmail.el	Fri Sep 05 19:28:36 2008 +0000
@@ -1560,6 +1560,7 @@
 
 	    (if (zerop new-messages)
 		(when (or file-name pmail-inbox-list)
+		  (pmail-show-message)
 		  (message "(No new mail has arrived)"))
 
 	      ;; Process the new messages for spam using the integrated