diff options
author | Joe Perches <joe@perches.com> | 2010-10-26 17:22:58 -0400 |
---|---|---|
committer | Linus Torvalds <torvalds@linux-foundation.org> | 2010-10-26 19:52:17 -0400 |
commit | fae99206769b6bbf8a20ab883726b164945771d7 (patch) | |
tree | 4fc23cafe29cac67d2aa16c23995e83a4f3b862c /scripts/get_maintainer.pl | |
parent | b9e2331dd1e0e04f7f2a6f8aa0c05bac2a7f0d7b (diff) |
scripts/get_maintainer.pl: don't deduplicate unnamed addresses ie: mailing lists
Fix a defect with the first mailing list address being used for each
subsequent mailing list.
Updated to 0.26-beta6.
Signed-off-by: Joe Perches <joe@perches.com>
Cc: Florian Mickler <florian@mickler.org>
Signed-off-by: Andrew Morton <akpm@linux-foundation.org>
Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>
Diffstat (limited to 'scripts/get_maintainer.pl')
-rwxr-xr-x | scripts/get_maintainer.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/scripts/get_maintainer.pl b/scripts/get_maintainer.pl index e822518bc610..d21ec3a89603 100755 --- a/scripts/get_maintainer.pl +++ b/scripts/get_maintainer.pl | |||
@@ -13,7 +13,7 @@ | |||
13 | use strict; | 13 | use strict; |
14 | 14 | ||
15 | my $P = $0; | 15 | my $P = $0; |
16 | my $V = '0.26-beta5'; | 16 | my $V = '0.26-beta6'; |
17 | 17 | ||
18 | use Getopt::Long qw(:config no_auto_abbrev); | 18 | use Getopt::Long qw(:config no_auto_abbrev); |
19 | 19 | ||
@@ -1036,7 +1036,7 @@ sub push_email_address { | |||
1036 | push(@email_to, [format_email($name, $address, $email_usename), $role]); | 1036 | push(@email_to, [format_email($name, $address, $email_usename), $role]); |
1037 | } elsif (!email_inuse($name, $address)) { | 1037 | } elsif (!email_inuse($name, $address)) { |
1038 | push(@email_to, [format_email($name, $address, $email_usename), $role]); | 1038 | push(@email_to, [format_email($name, $address, $email_usename), $role]); |
1039 | $email_hash_name{lc($name)}++; | 1039 | $email_hash_name{lc($name)}++ if ($name ne ""); |
1040 | $email_hash_address{lc($address)}++; | 1040 | $email_hash_address{lc($address)}++; |
1041 | } | 1041 | } |
1042 | 1042 | ||
@@ -1659,7 +1659,7 @@ sub deduplicate_email { | |||
1659 | 1659 | ||
1660 | ($name, $address) = parse_email($email); | 1660 | ($name, $address) = parse_email($email); |
1661 | 1661 | ||
1662 | if ($deduplicate_name_hash{lc($name)}) { | 1662 | if ($name ne "" && $deduplicate_name_hash{lc($name)}) { |
1663 | $name = $deduplicate_name_hash{lc($name)}->[0]; | 1663 | $name = $deduplicate_name_hash{lc($name)}->[0]; |
1664 | $address = $deduplicate_name_hash{lc($name)}->[1]; | 1664 | $address = $deduplicate_name_hash{lc($name)}->[1]; |
1665 | $matched = 1; | 1665 | $matched = 1; |