Function: rmail-write-region-annotate

rmail-write-region-annotate is a byte-compiled function defined in rmail.el.gz.

Signature

(rmail-write-region-annotate START END)

Source Code

;; Defined in /usr/src/emacs/lisp/mail/rmail.el.gz
;; Used in `write-region-annotate-functions' to write rmail files.
(defun rmail-write-region-annotate (start _end)
  (when (and (null start) rmail-buffer-swapped)
    (unless (buffer-live-p rmail-view-buffer)
      (error "Buffer `%s' with real text of `%s' has disappeared"
	     (buffer-name rmail-view-buffer)
	     (buffer-name (current-buffer))))
    (setq rmail-message-encoding buffer-file-coding-system)
    (set-buffer rmail-view-buffer)
    (widen)
    nil))