Function: gnus-convert-article-to-rmail

gnus-convert-article-to-rmail is a byte-compiled function defined in gnus-rmail.el.gz.

Signature

(gnus-convert-article-to-rmail)

Documentation

Convert article in current buffer to Rmail message format.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-rmail.el.gz
(defun gnus-convert-article-to-rmail ()
  "Convert article in current buffer to Rmail message format."
  (let ((buffer-read-only nil))
    ;; Convert article directly into Babyl format.
    (goto-char (point-min))
    (insert "\^L\n0, unseen,,\n*** EOOH ***\n")
    (while (search-forward "\n\^_" nil t) ;single char
      (replace-match "\n^_" t t))	;2 chars: "^" and "_"
    (goto-char (point-max))
    (insert "\^_")))