diff options
Diffstat (limited to 'scripts/get_maintainer.pl')
-rwxr-xr-x | scripts/get_maintainer.pl | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/scripts/get_maintainer.pl b/scripts/get_maintainer.pl index c1c088ef1420..5ef59214c555 100755 --- a/scripts/get_maintainer.pl +++ b/scripts/get_maintainer.pl | |||
@@ -27,6 +27,7 @@ my $email_usename = 1; | |||
27 | my $email_maintainer = 1; | 27 | my $email_maintainer = 1; |
28 | my $email_reviewer = 1; | 28 | my $email_reviewer = 1; |
29 | my $email_list = 1; | 29 | my $email_list = 1; |
30 | my $email_moderated_list = 1; | ||
30 | my $email_subscriber_list = 0; | 31 | my $email_subscriber_list = 0; |
31 | my $email_git_penguin_chiefs = 0; | 32 | my $email_git_penguin_chiefs = 0; |
32 | my $email_git = 0; | 33 | my $email_git = 0; |
@@ -248,6 +249,7 @@ if (!GetOptions( | |||
248 | 'r!' => \$email_reviewer, | 249 | 'r!' => \$email_reviewer, |
249 | 'n!' => \$email_usename, | 250 | 'n!' => \$email_usename, |
250 | 'l!' => \$email_list, | 251 | 'l!' => \$email_list, |
252 | 'moderated!' => \$email_moderated_list, | ||
251 | 's!' => \$email_subscriber_list, | 253 | 's!' => \$email_subscriber_list, |
252 | 'multiline!' => \$output_multiline, | 254 | 'multiline!' => \$output_multiline, |
253 | 'roles!' => \$output_roles, | 255 | 'roles!' => \$output_roles, |
@@ -1023,7 +1025,8 @@ MAINTAINER field selection options: | |||
1023 | --r => include reviewer(s) if any | 1025 | --r => include reviewer(s) if any |
1024 | --n => include name 'Full Name <addr\@domain.tld>' | 1026 | --n => include name 'Full Name <addr\@domain.tld>' |
1025 | --l => include list(s) if any | 1027 | --l => include list(s) if any |
1026 | --s => include subscriber only list(s) if any | 1028 | --moderated => include moderated lists(s) if any (default: true) |
1029 | --s => include subscriber only list(s) if any (default: false) | ||
1027 | --remove-duplicates => minimize duplicate email names/addresses | 1030 | --remove-duplicates => minimize duplicate email names/addresses |
1028 | --roles => show roles (status:subsystem, git-signer, list, etc...) | 1031 | --roles => show roles (status:subsystem, git-signer, list, etc...) |
1029 | --rolestats => show roles and statistics (commits/total_commits, %) | 1032 | --rolestats => show roles and statistics (commits/total_commits, %) |
@@ -1313,11 +1316,14 @@ sub add_categories { | |||
1313 | } else { | 1316 | } else { |
1314 | if ($email_list) { | 1317 | if ($email_list) { |
1315 | if (!$hash_list_to{lc($list_address)}) { | 1318 | if (!$hash_list_to{lc($list_address)}) { |
1316 | $hash_list_to{lc($list_address)} = 1; | ||
1317 | if ($list_additional =~ m/moderated/) { | 1319 | if ($list_additional =~ m/moderated/) { |
1318 | push(@list_to, [$list_address, | 1320 | if ($email_moderated_list) { |
1319 | "moderated list${list_role}"]); | 1321 | $hash_list_to{lc($list_address)} = 1; |
1322 | push(@list_to, [$list_address, | ||
1323 | "moderated list${list_role}"]); | ||
1324 | } | ||
1320 | } else { | 1325 | } else { |
1326 | $hash_list_to{lc($list_address)} = 1; | ||
1321 | push(@list_to, [$list_address, | 1327 | push(@list_to, [$list_address, |
1322 | "open list${list_role}"]); | 1328 | "open list${list_role}"]); |
1323 | } | 1329 | } |