projects
/
oweals
/
u-boot.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge tag 'signed-efi-next' of git://github.com/agraf/u-boot
[oweals/u-boot.git]
/
scripts
/
get_maintainer.pl
diff --git
a/scripts/get_maintainer.pl
b/scripts/get_maintainer.pl
index 368a20e2ccf3aad2ac43eef3847373d36d626f5b..83a4e5bad2428e63f113042225a182a3232c8d5e 100755
(executable)
--- a/
scripts/get_maintainer.pl
+++ b/
scripts/get_maintainer.pl
@@
-62,7
+62,7
@@
my %commit_author_hash;
my %commit_signer_hash;
my @penguin_chief = ();
my %commit_signer_hash;
my @penguin_chief = ();
-push(@penguin_chief, "Tom Rini:trini\@
ti
.com");
+push(@penguin_chief, "Tom Rini:trini\@
konsulko
.com");
my @penguin_chief_names = ();
foreach my $chief (@penguin_chief) {
my @penguin_chief_names = ();
foreach my $chief (@penguin_chief) {
@@
-298,7
+298,7
@@
sub read_maintainers {
while (<$maint>) {
my $line = $_;
while (<$maint>) {
my $line = $_;
- if ($line =~ m/^(
\C
):\s*(.*)/) {
+ if ($line =~ m/^(
[A-Z]
):\s*(.*)/) {
my $type = $1;
my $value = $2;
my $type = $1;
my $value = $2;
@@
-533,7
+533,7
@@
sub range_is_maintained {
for (my $i = $start; $i < $end; $i++) {
my $line = $typevalue[$i];
for (my $i = $start; $i < $end; $i++) {
my $line = $typevalue[$i];
- if ($line =~ m/^(
\C
):\s*(.*)/) {
+ if ($line =~ m/^(
[A-Z]
):\s*(.*)/) {
my $type = $1;
my $value = $2;
if ($type eq 'S') {
my $type = $1;
my $value = $2;
if ($type eq 'S') {
@@
-551,7
+551,7
@@
sub range_has_maintainer {
for (my $i = $start; $i < $end; $i++) {
my $line = $typevalue[$i];
for (my $i = $start; $i < $end; $i++) {
my $line = $typevalue[$i];
- if ($line =~ m/^(
\C
):\s*(.*)/) {
+ if ($line =~ m/^(
[A-Z]
):\s*(.*)/) {
my $type = $1;
my $value = $2;
if ($type eq 'M') {
my $type = $1;
my $value = $2;
if ($type eq 'M') {
@@
-600,7
+600,7
@@
sub get_maintainers {
for ($i = $start; $i < $end; $i++) {
my $line = $typevalue[$i];
for ($i = $start; $i < $end; $i++) {
my $line = $typevalue[$i];
- if ($line =~ m/^(
\C
):\s*(.*)/) {
+ if ($line =~ m/^(
[A-Z]
):\s*(.*)/) {
my $type = $1;
my $value = $2;
if ($type eq 'X') {
my $type = $1;
my $value = $2;
if ($type eq 'X') {
@@
-615,7
+615,7
@@
sub get_maintainers {
if (!$exclude) {
for ($i = $start; $i < $end; $i++) {
my $line = $typevalue[$i];
if (!$exclude) {
for ($i = $start; $i < $end; $i++) {
my $line = $typevalue[$i];
- if ($line =~ m/^(
\C
):\s*(.*)/) {
+ if ($line =~ m/^(
[A-Z]
):\s*(.*)/) {
my $type = $1;
my $value = $2;
if ($type eq 'F') {
my $type = $1;
my $value = $2;
if ($type eq 'F') {
@@
-917,7
+917,7
@@
sub find_first_section {
while ($index < @typevalue) {
my $tv = $typevalue[$index];
while ($index < @typevalue) {
my $tv = $typevalue[$index];
- if (($tv =~ m/^(
\C
):\s*(.*)/)) {
+ if (($tv =~ m/^(
[A-Z]
):\s*(.*)/)) {
last;
}
$index++;
last;
}
$index++;
@@
-931,7
+931,7
@@
sub find_starting_index {
while ($index > 0) {
my $tv = $typevalue[$index];
while ($index > 0) {
my $tv = $typevalue[$index];
- if (!($tv =~ m/^(
\C
):\s*(.*)/)) {
+ if (!($tv =~ m/^(
[A-Z]
):\s*(.*)/)) {
last;
}
$index--;
last;
}
$index--;
@@
-945,7
+945,7
@@
sub find_ending_index {
while ($index < @typevalue) {
my $tv = $typevalue[$index];
while ($index < @typevalue) {
my $tv = $typevalue[$index];
- if (!($tv =~ m/^(
\C
):\s*(.*)/)) {
+ if (!($tv =~ m/^(
[A-Z]
):\s*(.*)/)) {
last;
}
$index++;
last;
}
$index++;
@@
-971,7
+971,7
@@
sub get_maintainer_role {
for ($i = $start + 1; $i < $end; $i++) {
my $tv = $typevalue[$i];
for ($i = $start + 1; $i < $end; $i++) {
my $tv = $typevalue[$i];
- if ($tv =~ m/^(
\C
):\s*(.*)/) {
+ if ($tv =~ m/^(
[A-Z]
):\s*(.*)/) {
my $ptype = $1;
my $pvalue = $2;
if ($ptype eq "S") {
my $ptype = $1;
my $pvalue = $2;
if ($ptype eq "S") {
@@
-1030,7
+1030,7
@@
sub add_categories {
for ($i = $start + 1; $i < $end; $i++) {
my $tv = $typevalue[$i];
for ($i = $start + 1; $i < $end; $i++) {
my $tv = $typevalue[$i];
- if ($tv =~ m/^(
\C
):\s*(.*)/) {
+ if ($tv =~ m/^(
[A-Z]
):\s*(.*)/) {
my $ptype = $1;
my $pvalue = $2;
if ($ptype eq "L") {
my $ptype = $1;
my $pvalue = $2;
if ($ptype eq "L") {
@@
-1072,7
+1072,7
@@
sub add_categories {
if ($name eq "") {
if ($i > 0) {
my $tv = $typevalue[$i - 1];
if ($name eq "") {
if ($i > 0) {
my $tv = $typevalue[$i - 1];
- if ($tv =~ m/^(
\C
):\s*(.*)/) {
+ if ($tv =~ m/^(
[A-Z]
):\s*(.*)/) {
if ($1 eq "P") {
$name = $2;
$pvalue = format_email($name, $address, $email_usename);
if ($1 eq "P") {
$name = $2;
$pvalue = format_email($name, $address, $email_usename);