Lines Matching refs:email

27 my $email = 1;
245 		'email!' => \$email,
320     $output_substatus = $email && $output_roles && -t STDOUT;
325     $email = 0;
336     my $selections = $email + $scm + $status + $subsystem + $web + $bug;
342 if ($email &&
979     foreach my $email (@email_to, @list_to) {
980 	$email->[0] = deduplicate_email($email->[0]);
984 	if ($email &&
991 	if ($email && $email_git_blame) {
996     if ($email) {
1010 	foreach my $email (@file_emails) {
1011 	    $email = mailmap_email($email);
1012 	    my ($name, $address) = parse_email($email);
1025     if ($email || $email_list) {
1026 	if ($email) {
1470     my $email = format_email($name, $address, $email_usename);
1485 	    if ($email eq $entry->[0]
1526     my $email = format_email($name, $address, 1);
1530     if (exists $mailmap->{names}->{$email} ||
1531 	exists $mailmap->{addresses}->{$email}) {
1532 	if (exists $mailmap->{names}->{$email}) {
1533 	    $real_name = $mailmap->{names}->{$email};
1535 	if (exists $mailmap->{addresses}->{$email}) {
1536 	    $real_address = $mailmap->{addresses}->{$email};
1564     foreach my $email (@emails) {
1565 	my ($name, $address) = parse_email($email);
1568 	    $email = format_email($name, $address, 1);
1833 		my $email = $entry->[0];
1837 		my $commit_author = $commit_author_hash{$email};
1838 		my $commit_signer = $commit_signer_hash{$email};
1843 		printf STDERR "%1s %2d %-65s", $sel, $count + 1, $email;
1848 		    my $commit_author = $commit_author_hash{$email};
1854 		    my $commit_signer = $commit_signer_hash{$email};
2090     my ($email) = @_;
2093     my ($name, $address) = parse_email($email);
2094     $email = format_email($name, $address, 1);
2095     $email = mailmap_email($email);
2097     return $email if (!$email_remove_duplicates);
2099     ($name, $address) = parse_email($email);
2114     $email = format_email($name, $address, 1);
2115     $email = mailmap_email($email);
2116     return $email;
2488     foreach my $email (@file_emails) {
2489 	$email =~ s/[\(\<\{]{0,1}([A-Za-z0-9_\.\+-]+\@[A-Za-z0-9\.-]+)[\)\>\}]{0,1}/\<$1\>/g;
2490 	my ($name, $address) = parse_email($email);