Commit 447f30f6 authored by Glenn Morris's avatar Glenn Morris

rmailout fix for bug#9978.

* lisp/mail/rmailout.el (rmail-output-to-rmail-buffer):
Handle empty buffers.
parent 91af3942
2011-11-15 Glenn Morris <rgm@gnu.org>
* mail/rmailout.el (rmail-output-to-rmail-buffer):
Handle empty buffers. (Bug#9978)
2011-11-14 Juanma Barranquero <lekktu@gmail.com> 2011-11-14 Juanma Barranquero <lekktu@gmail.com>
* international/mule.el (define-charset): * international/mule.el (define-charset):
......
...@@ -377,11 +377,12 @@ display message number MSG." ...@@ -377,11 +377,12 @@ display message number MSG."
(rmail-maybe-set-message-counters) (rmail-maybe-set-message-counters)
;; Insert the new message after the last old message. ;; Insert the new message after the last old message.
(widen) (widen)
;; Make sure the last old message ends with a blank line. (unless (zerop (buffer-size))
(goto-char (point-max)) ;; Make sure the last old message ends with a blank line.
(rmail-ensure-blank-line) (goto-char (point-max))
;; Insert the new message at the end. (rmail-ensure-blank-line)
(narrow-to-region (point-max) (point-max)) ;; Insert the new message at the end.
(narrow-to-region (point-max) (point-max)))
(insert-buffer-substring tembuf) (insert-buffer-substring tembuf)
(rmail-count-new-messages t) (rmail-count-new-messages t)
;; FIXME should re-use existing windows. ;; FIXME should re-use existing windows.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment