Mercurial > emacs
comparison lisp/mail/pmail.el @ 97923:f278df5ab031
(pmail-reply-callback): Call pmail-show-message to repaint the
message, insuring that new headers, like X-BABYL-V6... are correctly
hidden.
| author | Paul Reilly <pmr@pajato.com> |
|---|---|
| date | Mon, 01 Sep 2008 10:56:37 +0000 |
| parents | 92a6838937ab |
| children | cc9bb337ef7c |
comparison
equal
deleted
inserted
replaced
| 97922:63526292266d | 97923:f278df5ab031 |
|---|---|
| 2780 Sets ATTR (a string) if STATE is | 2780 Sets ATTR (a string) if STATE is |
| 2781 non-nil, otherwise clears it. N is the message number. | 2781 non-nil, otherwise clears it. N is the message number. |
| 2782 BUFFER, possibly narrowed, contains an mbox mail message." | 2782 BUFFER, possibly narrowed, contains an mbox mail message." |
| 2783 (save-excursion | 2783 (save-excursion |
| 2784 (set-buffer buffer) | 2784 (set-buffer buffer) |
| 2785 (pmail-set-attribute attr state n))) | 2785 (pmail-set-attribute attr state n) |
| 2786 (pmail-show-message))) | |
| 2786 | 2787 |
| 2787 (defun pmail-mark-message (msgnum-list attr-index) | 2788 (defun pmail-mark-message (msgnum-list attr-index) |
| 2788 "Set attribute ATTRIBUTE-INDEX in the message of the car of MSGNUM-LIST. | 2789 "Set attribute ATTRIBUTE-INDEX in the message of the car of MSGNUM-LIST. |
| 2789 This is used in the send-actions for | 2790 This is used in the send-actions for |
| 2790 message buffers. MSGNUM-LIST is a list of the form (MSGNUM)." | 2791 message buffers. MSGNUM-LIST is a list of the form (MSGNUM)." |