"\\(" "debian\\.org"
"\\|" "distorted\\.org\\.uk"
"\\)$")
- addr))
+ addr)
+ (and (string-match "^news\\([0-9]+\\)@\\(.*\\)$" addr)
+ (string= (md5 (match-string 2 addr))
+ "879b795aed959b1a000e9f95c132b16c")))
nil)
((string-match "^\\([^@+]+\\)\\+[^@]*\\(@.*\\)$" addr)
(concat (match-string 1 addr) (match-string 2 addr)))