Mercurial > hg > xemacs-beta

comparison lisp/packages/supercite.el @ 108:360340f9fd5f r20-1b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b6
author cvs
date Mon, 13 Aug 2007 09:18:39 +0200
parents 131b0175ea99
children 7d55a9ba150c
comparison
equal deleted inserted replaced
107:523141596bda 108:360340f9fd5f
216 "*Warn if mail headers don't conform to RFC822.") 216 "*Warn if mail headers don't conform to RFC822.")
217 (defvar sc-mumble "" 217 (defvar sc-mumble ""
218 "*Value returned by `sc-mail-field' if field isn't in mail headers.") 218 "*Value returned by `sc-mail-field' if field isn't in mail headers.")
219 219
220 (defvar sc-name-filter-alist 220 (defvar sc-name-filter-alist
221 '(("^\\(Mr\\|Mrs\\|Ms\\|Dr\\)[.]?$" . 0) 221 '(
222 ;; This first item removes any [bracketed] multi-word items in names.
223 ;; Each word is already split into a separate string when this filter is
224 ;; applied, hence the complexity of the expression.
225 ("\\[.*\\]\\|\\[[^\]]*\\|[^\[]*\\]" . any)
226 ("^\\(Mr\\|Mrs\\|Ms\\|Dr\\)[.]?$" . 0)
222 ("^\\(Jr\\|Sr\\)[.]?$" . last) 227 ("^\\(Jr\\|Sr\\)[.]?$" . last)
223 ("^ASTS$" . 0) 228 ("^ASTS$" . 0)
224 ("^[I]+$" . last)) 229 ("^[I]+$" . last))
225 "*Name list components which are filtered out as noise. 230 "*Name list components which are filtered out as noise.
226 This variable contains an association list where each element is of 231 This variable contains an association list where each element is of