Function: message-mark-insert-file

message-mark-insert-file is an interactive and byte-compiled function defined in message.el.gz.

Signature

(message-mark-insert-file FILE &optional VERBATIM)

Documentation

Insert FILE at point, marking it 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-insert-file (file &optional verbatim)
  "Insert FILE at point, marking it with enclosing tags.
See `message-mark-insert-begin' and `message-mark-insert-end'.
If VERBATIM, use slrn style verbatim marks (\"#v+\" and \"#v-\")."
  (interactive "fFile to insert: \nP" message-mode)
    ;; reverse insertion to get correct result.
  (let ((p (point)))
    (insert (if verbatim "#v-\n" message-mark-insert-end))
    (goto-char p)
    (insert-file-contents file)
    (goto-char p)
    (insert (if verbatim "#v+\n" message-mark-insert-begin))))