Function: nngateway-request-post

nngateway-request-post is a byte-compiled function defined in nngateway.el.gz.

Signature

(nngateway-request-post &optional SERVER)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/nngateway.el.gz
(deffoo nngateway-request-post (&optional server)
  (when (or (nngateway-server-opened server)
	    (nngateway-open-server server))
    ;; Rewrite the header.
    (let ((buf (current-buffer)))
      (with-temp-buffer
	(insert-buffer-substring buf)
	(message-narrow-to-head)
	(funcall nngateway-header-transformation nngateway-address)
	(goto-char (point-max))
	(insert mail-header-separator "\n")
	(widen)
	(let (message-required-mail-headers)
	  (funcall (or message-send-mail-real-function
		       message-send-mail-function)))
	t))))