Merge branch 'ao/send-email-irt'

[git.git] / git-send-email.perl

diff --git a/git-send-email.perl b/git-send-email.perl
index fe6b8485cd0c0781908cf83e377be048cfc0544b..76565de2ee517f48001ffacca32e3c08320cfe38 100755 (executable)
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -960,7 +960,7 @@ sub maildomain {
 sub send_message {
        my @recipients = unique_email_list(@to);
        @cc = (grep { my $cc = extract_valid_address($_);
-                     not grep { $cc eq $_ } @recipients
+                     not grep { $cc eq $_ || $_ =~ /<\Q${cc}\E>$/ } @recipients
                    }
               map { sanitize_address($_) }
               @cc);