(defun rmail-summary nil "\ Display a summary of all messages, one line per message." (interactive) (byte-code "\"" [nil rmail-new-summary "All"] 3)) (defun rmail-summary-by-labels (labels) "\ Display a summary of all messages with one or more LABELS. LABELS should be a string containing the desired labels, separated by commas." (interactive "sLabels to summarize by: ") (byte-code "\" !P!Q#" [labels rmail-last-multi-labels nil string= "" error "No label specified" rmail-new-summary "labels " rmail-message-labels-p ", \\(" mail-comma-list-regexp "\\),"] 9)) (defun rmail-summary-by-recipients (recipients &optional primary-only) "\ Display a summary of all messages with the given RECIPIENTS. Normally checks the To, From and Cc fields of headers; but if PRIMARY-ONLY is non-nil (prefix arg given), only look in the To and From fields. RECIPIENTS is a string of names separated by commas." (interactive "sRecipients to summarize by: P") (byte-code "P! $" [recipients primary-only nil rmail-new-summary "recipients " rmail-message-recipients-p mail-comma-list-regexp] 6)) (defun rmail-message-recipients-p (msg recipients &optional primary-only) (byte-code "!b!`!`\" ! \"<