diff options
| author | Paul Reilly | 2008-09-05 19:28:36 +0000 |
|---|---|---|
| committer | Paul Reilly | 2008-09-05 19:28:36 +0000 |
| commit | d444063ebc4d5025f2b14f70af4b82d39b7dff85 (patch) | |
| tree | 3077915bed998bb577e99113c4f4a7139ff38d57 | |
| parent | 746abd4d0d0c5082416697dc4f08887c362c0904 (diff) | |
| download | emacs-d444063ebc4d5025f2b14f70af4b82d39b7dff85.tar.gz emacs-d444063ebc4d5025f2b14f70af4b82d39b7dff85.zip | |
* pmail.el (pmail-get-new-mail): When there are no new messages,
invoke a redisplay of the current message.
| -rw-r--r-- | lisp/mail/pmail.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/mail/pmail.el b/lisp/mail/pmail.el index 38a6a2cd6c5..e5ad3f49670 100644 --- a/lisp/mail/pmail.el +++ b/lisp/mail/pmail.el | |||
| @@ -1560,6 +1560,7 @@ updated file. It returns t if it got any new messages." | |||
| 1560 | 1560 | ||
| 1561 | (if (zerop new-messages) | 1561 | (if (zerop new-messages) |
| 1562 | (when (or file-name pmail-inbox-list) | 1562 | (when (or file-name pmail-inbox-list) |
| 1563 | (pmail-show-message) | ||
| 1563 | (message "(No new mail has arrived)")) | 1564 | (message "(No new mail has arrived)")) |
| 1564 | 1565 | ||
| 1565 | ;; Process the new messages for spam using the integrated | 1566 | ;; Process the new messages for spam using the integrated |