|
| From: | Tory S. Anderson |
| Subject: | Re: cleaning up a big regexp |
| Date: | Mon, 15 Sep 2014 08:06:12 -0400 |
| User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/24.3 (gnu/linux) |
Ok. Applying the advice I've received so far, I have the following (which
doesn't quite evaluate). Clearly my syntax is wrong.
(setq my-gnus-bulk-from-address-list '("@maillist.codeproject.com"
"@papajohns-specials.com"
"@qomail.quikorder.com"
"@linkedin.com"
"@facebookmail.com"
"@plus.google.com"
"@twitter.com"
"@youtube.com"
"@linguistlist.org"
"sportsauthority.com")) ;; list of
bulkmail addresses
(setq my-gnus-bulk-from-address-regexp (mapconcat `regexp-quote
my-gnus-bulk-from-address-list "\\|")) ;; make OR
(setq my-gnus-bulk-from-regexp
(regexp-opt (mapconcat `(concat "^From:.*")
my-gnus-bulk-from-address-regexp "\\|"))) ;; apply "From.*" to the start of
each address
| [Prev in Thread] | Current Thread | [Next in Thread] |