Function: nnmail-replace-status
nnmail-replace-status is a byte-compiled function defined in
nnmail.el.gz.
Signature
(nnmail-replace-status NAME VALUE)
Documentation
Make status NAME and VALUE part of the current status line.
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/nnmail.el.gz
;;;
;;; Status functions
;;;
(defun nnmail-replace-status (name value)
"Make status NAME and VALUE part of the current status line."
(save-restriction
(message-narrow-to-head)
(let ((status (nnmail-decode-status)))
(setq status (delq (member name status) status))
(when value
(push (cons name value) status))
(message-remove-header "status")
(goto-char (point-max))
(insert "Status: " (nnmail-encode-status status) "\n"))))