Function: message-mark-inserted-region
message-mark-inserted-region is an interactive and byte-compiled
function defined in message.el.gz.
Signature
(message-mark-inserted-region BEG END &optional VERBATIM)
Documentation
Mark some region in the current article with enclosing tags.
See message-mark-insert-begin and message-mark-insert-end.
If VERBATIM, use slrn style verbatim marks ("#v+" and "#v-").
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/message.el.gz
(defun message-mark-inserted-region (beg end &optional verbatim)
"Mark some region in the current article with enclosing tags.
See `message-mark-insert-begin' and `message-mark-insert-end'.
If VERBATIM, use slrn style verbatim marks (\"#v+\" and \"#v-\")."
(interactive "r\nP" message-mode)
(save-excursion
;; add to the end of the region first, otherwise end would be invalid
(goto-char end)
(unless (bolp)
(insert "\n"))
(insert (if verbatim "#v-\n" message-mark-insert-end))
(goto-char beg)
(insert (if verbatim "#v+\n" message-mark-insert-begin))))