Function: message-forward-subject-author-subject

message-forward-subject-author-subject is a byte-compiled function defined in message.el.gz.

Signature

(message-forward-subject-author-subject SUBJECT)

Documentation

Generate a SUBJECT for a forwarded message.

The form is: [Source] Subject, where if the original message was mail, Source is the sender, and if the original message was news, Source is the list of newsgroups is was posted to.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/message.el.gz
(defun message-forward-subject-author-subject (subject)
  "Generate a SUBJECT for a forwarded message.
The form is: [Source] Subject, where if the original message was mail,
Source is the sender, and if the original message was news, Source is
the list of newsgroups is was posted to."
  (let* ((group (message-fetch-field "newsgroups"))
	 (prefix
	  (or group
	      (or (message-fetch-field "from")
		  "(nowhere)"))))
    (concat "["
	    (if message-forward-decoded-p
		prefix
	      (mail-decode-encoded-word-string prefix))
	    "] " subject)))