Function: gnus-mailing-list-followup-to

gnus-mailing-list-followup-to is a byte-compiled function defined in gnus-msg.el.gz.

Signature

(gnus-mailing-list-followup-to)

Documentation

Look at the headers in the current buffer and return a Mail-Followup-To address.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-msg.el.gz
(defun gnus-mailing-list-followup-to ()
  "Look at the headers in the current buffer and return a Mail-Followup-To address."
  (let ((x-been-there (gnus-fetch-original-field "x-beenthere"))
	(list-post (gnus-fetch-original-field "list-post")))
    (when (and list-post
	       (string-match "mailto:\\([^>]+\\)" list-post))
      (setq list-post (match-string 1 list-post)))
    (or list-post
	x-been-there)))