Function: rmail-get-attr-names

rmail-get-attr-names is a byte-compiled function defined in rmail.el.gz.

Signature

(rmail-get-attr-names &optional MSG)

Documentation

Return the message attributes in a comma separated string.

MSG specifies the message number to get it from. If MSG is nil, use the current message.

Source Code

;; Defined in /usr/src/emacs/lisp/mail/rmail.el.gz
;;;; *** Rmail Attributes and Keywords ***

(defun rmail-get-attr-names (&optional msg)
  "Return the message attributes in a comma separated string.
MSG specifies the message number to get it from.
If MSG is nil, use the current message."
  (let ((value (rmail-get-header rmail-attribute-header msg))
	(nmax (length rmail-attr-array))
	result temp)
    (when value
      (if (> (length value) nmax)
          (message "Warning: corrupt attribute header in message")
        (dotimes (index (length value))
          (setq temp (and (not (= ?- (aref value index)))
                          (nth 1 (aref rmail-attr-array index)))
                result
                (cond
                 ((and temp result) (format "%s, %s" result temp))
                 (temp temp)
                 (t result)))))
      result)))