Function: gnus-article-treat-body-boundary
gnus-article-treat-body-boundary is an interactive and byte-compiled
function defined in gnus-art.el.gz.
Signature
(gnus-article-treat-body-boundary)
Documentation
Place a boundary line at the end of the headers.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/gnus-art.el.gz
(defun gnus-article-treat-body-boundary ()
"Place a boundary line at the end of the headers."
(interactive nil gnus-article-mode gnus-summary-mode)
(when (and gnus-body-boundary-delimiter
(> (length gnus-body-boundary-delimiter) 0))
(gnus-with-article-headers
(goto-char (point-max))
(let ((start (point)))
(insert "X-Boundary: ")
(add-text-properties start (point) gnus-hidden-properties)
(insert (let (str (max (window-width)))
(while (>= max (length str))
(setq str (concat str gnus-body-boundary-delimiter)))
(substring str 0 max))
"\n")
(put-text-property start (point) 'gnus-decoration 'header)))))