diff options
| -rw-r--r-- | lisp/ChangeLog | 1 | ||||
| -rw-r--r-- | lisp/mail/rmailout.el | 6 |
2 files changed, 4 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d097c18917d..ea988d17f26 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -8,6 +8,7 @@ | |||
| 8 | (rmail-output-as-mbox, rmail-output-as-seen): Doc fix. | 8 | (rmail-output-as-mbox, rmail-output-as-seen): Doc fix. |
| 9 | (rmail-output-as-mbox): Start search from point-min. If constructing a | 9 | (rmail-output-as-mbox): Start search from point-min. If constructing a |
| 10 | "From " line, prefer the date header over the current time. | 10 | "From " line, prefer the date header over the current time. |
| 11 | (rmail-update-summary): Move declaration earlier in file. | ||
| 11 | 12 | ||
| 12 | 2009-02-15 Richard M Stallman <rms@gnu.org> | 13 | 2009-02-15 Richard M Stallman <rms@gnu.org> |
| 13 | 14 | ||
diff --git a/lisp/mail/rmailout.el b/lisp/mail/rmailout.el index 747d84cb968..0d3047c5060 100644 --- a/lisp/mail/rmailout.el +++ b/lisp/mail/rmailout.el | |||
| @@ -130,6 +130,9 @@ It alters the current buffer's text, so it should be a temp buffer." | |||
| 130 | (goto-char (point-max)) | 130 | (goto-char (point-max)) |
| 131 | (insert-buffer-substring tembuf))))))) | 131 | (insert-buffer-substring tembuf))))))) |
| 132 | 132 | ||
| 133 | ;; Called only if rmail-summary-exists, which means rmailsum is loaded. | ||
| 134 | (declare-function rmail-update-summary "rmailsum" (&rest ignore)) | ||
| 135 | |||
| 133 | (defun rmail-output-to-babyl-buffer (tembuf msg) | 136 | (defun rmail-output-to-babyl-buffer (tembuf msg) |
| 134 | "Copy msg in TEMBUF from BEG to END into this old R-mail BABYL buffer. | 137 | "Copy msg in TEMBUF from BEG to END into this old R-mail BABYL buffer. |
| 135 | Do what is necessary to make babyl R-mail know about the new message. | 138 | Do what is necessary to make babyl R-mail know about the new message. |
| @@ -359,9 +362,6 @@ AS-SEEN is non-nil if we are copying the message \"as seen\"." | |||
| 359 | (goto-char (point-max)) | 362 | (goto-char (point-max)) |
| 360 | (insert-buffer-substring tembuf))))))) | 363 | (insert-buffer-substring tembuf))))))) |
| 361 | 364 | ||
| 362 | ;; Called only if rmail-summary-exists, which means rmailsum is loaded. | ||
| 363 | (declare-function rmail-update-summary "rmailsum" (&rest ignore)) | ||
| 364 | |||
| 365 | (defun rmail-output-to-rmail-buffer (tembuf msg) | 365 | (defun rmail-output-to-rmail-buffer (tembuf msg) |
| 366 | "Copy msg in TEMBUF from BEG to END into this Rmail buffer. | 366 | "Copy msg in TEMBUF from BEG to END into this Rmail buffer. |
| 367 | Do what is necessary to make Rmail know about the new message. | 367 | Do what is necessary to make Rmail know about the new message. |