# HG changeset patch # User Glenn Morris # Date 1232414215 0 # Node ID 5804c18fda152745195b82b3bcc96a2a681944a8 # Parent 298d0ff6c1afaf6c5be3085204d9c3c10ce09cfd (pmail-message-labels-p): Move back to pmail.el. diff -r 298d0ff6c1af -r 5804c18fda15 lisp/mail/pmailsum.el --- a/lisp/mail/pmailsum.el Tue Jan 20 01:16:28 2009 +0000 +++ b/lisp/mail/pmailsum.el Tue Jan 20 01:16:55 2009 +0000 @@ -92,13 +92,6 @@ 'pmail-message-labels-p (concat ", \\(" (mail-comma-list-regexp labels) "\\),"))) -;; Moved here from pmail (which this file requires) 20090105, creating -;; a compiler warning. ? -;; Return t if the attributes/keywords line of msg number MSG -;; contains a match for the regexp LABELS. -(defun pmail-message-labels-p (msg labels) - (string-match labels (pmail-get-labels msg))) - ;;;###autoload (defun pmail-summary-by-recipients (recipients &optional primary-only) "Display a summary of all messages with the given RECIPIENTS.