Re: [PATCH] git-send-email.perl: Deduplicate "to:" and "cc:" entries with names

From: Andreas Schwab <schwab@linux-m68k.org>
Date: Nov 20, 2010, 20:15 UTC
Message-ID: <m2mxp3zr88.fsf@igel.home>
In-Reply-To: <1290272809.27951.30.camel@Joe-Laptop>

Joe Perches <joe@perches.com> writes:

Show 10 quoted lines

> diff --git a/git-send-email.perl b/git-send-email.perl
> index f68ed5a..1ae5fbf 100755
> --- 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 $_ || $_ =~ /<${cc}>$/ } @recipients

                                                    /<\Q${cc}\E>$/

Andreas.

-- 
Andreas Schwab, schwab@linux-m68k.org
GPG Key fingerprint = 58CA 54C7 6D53 942B 1756  01D3 44D5 214B 8276 4ED5
"And now for something completely different."