Function: mh-send-sub

mh-send-sub is a byte-compiled function defined in mh-comp.el.gz.

Signature

(mh-send-sub TO CC SUBJECT CONFIG)

Documentation

Do the real work of composing and sending a letter.

Expects the TO, CC, and SUBJECT fields as arguments. CONFIG is the window configuration before sending mail.

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-comp.el.gz
(defun mh-send-sub (to cc subject config)
  "Do the real work of composing and sending a letter.
Expects the TO, CC, and SUBJECT fields as arguments.
CONFIG is the window configuration before sending mail."
  (let ((folder mh-current-folder)
        (msg-num (mh-get-msg-num nil)))
    (message "Composing a message...")
    (let ((draft (mh-read-draft
                  "message"
                  (mh-bare-components mh-comp-formfile)
                  t)))
      (mh-insert-fields "To:" to "Subject:" subject "Cc:" cc)
      (goto-char (point-max))
      (mh-compose-and-send-mail draft "" folder msg-num
                                to subject cc
                                nil nil config)
      (mh-letter-mode-message)
      (mh-letter-adjust-point))))