dot/emacs: Don't snarf addresses from Microsoft's `Junk Email' folder.

diff --git a/dot/emacs b/dot/emacs
index 22da44c..e60294d 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
@@ -233,11 +233,13 @@
       (lambda ()
        (let ((group gnus-newsgroup-name))
          (and (string-match "^nn\\(imap\\|folder\\)\\+" group)
-              (not (string-match (concat ":" "\\(" "crap"
-                                             "\\|" "spam"
-                                             "\\|" "lists"
-                                             "\\|" "corpus"
-                                             "\\)" "\\.")
+              (not (string-match (concat ":" "\\(" "\\(" "crap"
+                                                   "\\|" "spam"
+                                                   "\\|" "lists"
+                                                   "\\|" "corpus"
+                                                   "\\)" "\\."
+                                             "\\|" "Junk Email$"
+                                             "\\)")
                                  group)))))
       bbdb-user-mail-names
       (concat "^"