mda: fix address matching in address lists

This is common when multiple participants are in a thread.

1 files changed, 1 insertions, 1 deletions

diff --git a/lib/PublicInbox/MDA.pm b/lib/PublicInbox/MDA.pm
index 0f583e65..bcf5358b 100644
--- a/lib/PublicInbox/MDA.pm
+++ b/lib/PublicInbox/MDA.pm
@@ -64,7 +64,7 @@ sub alias_specified {
         } @address;
 
         foreach my $line ($simple->header('Cc'), $simple->header('To')) {
-                my @addrs = ($line =~ /([^<\s]+\@[^>\s]+)/g);
+                my @addrs = ($line =~ /([^,<\s]+\@[^,>\s]+)/g);
                 foreach my $addr (@addrs) {
                         if ($ok{lc(__drop_plus($addr))}) {
                                 return 1;