comparison lisp/mail/rmailout.el @ 101993:1bb96ade4801

Update for rmail-show-message -> rmail-show-message-1 name change.

101992:ef7ed7efa61c

    (narrow-to-region (point) (point-max))
    (rmail-count-new-messages t)
    (if (rmail-summary-exists)
	(rmail-select-summary
	 (rmail-update-summary)))
    (rmail-show-message msg)))

(defun rmail-convert-to-babyl-format ()
  (let ((count 0) (start (point-min))
	(case-fold-search nil)
	(buffer-undo-list t))

    (insert-buffer-substring tembuf)
    (rmail-count-new-messages t)
    (if (rmail-summary-exists)
	(rmail-select-summary
	 (rmail-update-summary)))
    (rmail-show-message msg)))

;;; There are functions elsewhere in Emacs that use this function;
;;; look at them before you change the calling method.
;;;###autoload
(defun rmail-output (file-name &optional count noattribute from-gnus)

101993:1bb96ade4801

    (narrow-to-region (point) (point-max))
    (rmail-count-new-messages t)
    (if (rmail-summary-exists)
	(rmail-select-summary
	 (rmail-update-summary)))
    (rmail-show-message-1 msg)))

(defun rmail-convert-to-babyl-format ()
  (let ((count 0) (start (point-min))
	(case-fold-search nil)
	(buffer-undo-list t))

    (insert-buffer-substring tembuf)
    (rmail-count-new-messages t)
    (if (rmail-summary-exists)
	(rmail-select-summary
	 (rmail-update-summary)))
    (rmail-show-message-1 msg)))

;;; There are functions elsewhere in Emacs that use this function;
;;; look at them before you change the calling method.
;;;###autoload
(defun rmail-output (file-name &optional count noattribute from-gnus)