get_maintainer.pl: \C is deprecated
"Match a single C-language char (octet) even if that is part of a larger UTF-8 character. Thus it breaks up characters into their UTF-8 bytes, so you may end up with malformed pieces of UTF-8." Just use a period instead. Signed-off-by: Paolo Bonzini <pbonzini@redhat.com>
This commit is contained in:
parent
500887768a
commit
ba10f729f1
@ -258,7 +258,7 @@ open (my $maint, '<', "${lk_path}MAINTAINERS")
|
|||||||
while (<$maint>) {
|
while (<$maint>) {
|
||||||
my $line = $_;
|
my $line = $_;
|
||||||
|
|
||||||
if ($line =~ m/^(\C):\s*(.*)/) {
|
if ($line =~ m/^(.):\s*(.*)/) {
|
||||||
my $type = $1;
|
my $type = $1;
|
||||||
my $value = $2;
|
my $value = $2;
|
||||||
|
|
||||||
@ -493,7 +493,7 @@ sub range_is_maintained {
|
|||||||
|
|
||||||
for (my $i = $start; $i < $end; $i++) {
|
for (my $i = $start; $i < $end; $i++) {
|
||||||
my $line = $typevalue[$i];
|
my $line = $typevalue[$i];
|
||||||
if ($line =~ m/^(\C):\s*(.*)/) {
|
if ($line =~ m/^(.):\s*(.*)/) {
|
||||||
my $type = $1;
|
my $type = $1;
|
||||||
my $value = $2;
|
my $value = $2;
|
||||||
if ($type eq 'S') {
|
if ($type eq 'S') {
|
||||||
@ -511,7 +511,7 @@ sub range_has_maintainer {
|
|||||||
|
|
||||||
for (my $i = $start; $i < $end; $i++) {
|
for (my $i = $start; $i < $end; $i++) {
|
||||||
my $line = $typevalue[$i];
|
my $line = $typevalue[$i];
|
||||||
if ($line =~ m/^(\C):\s*(.*)/) {
|
if ($line =~ m/^(.):\s*(.*)/) {
|
||||||
my $type = $1;
|
my $type = $1;
|
||||||
my $value = $2;
|
my $value = $2;
|
||||||
if ($type eq 'M') {
|
if ($type eq 'M') {
|
||||||
@ -560,7 +560,7 @@ sub get_maintainers {
|
|||||||
|
|
||||||
for ($i = $start; $i < $end; $i++) {
|
for ($i = $start; $i < $end; $i++) {
|
||||||
my $line = $typevalue[$i];
|
my $line = $typevalue[$i];
|
||||||
if ($line =~ m/^(\C):\s*(.*)/) {
|
if ($line =~ m/^(.):\s*(.*)/) {
|
||||||
my $type = $1;
|
my $type = $1;
|
||||||
my $value = $2;
|
my $value = $2;
|
||||||
if ($type eq 'X') {
|
if ($type eq 'X') {
|
||||||
@ -575,7 +575,7 @@ sub get_maintainers {
|
|||||||
if (!$exclude) {
|
if (!$exclude) {
|
||||||
for ($i = $start; $i < $end; $i++) {
|
for ($i = $start; $i < $end; $i++) {
|
||||||
my $line = $typevalue[$i];
|
my $line = $typevalue[$i];
|
||||||
if ($line =~ m/^(\C):\s*(.*)/) {
|
if ($line =~ m/^(.):\s*(.*)/) {
|
||||||
my $type = $1;
|
my $type = $1;
|
||||||
my $value = $2;
|
my $value = $2;
|
||||||
if ($type eq 'F') {
|
if ($type eq 'F') {
|
||||||
@ -855,7 +855,7 @@ sub find_first_section {
|
|||||||
|
|
||||||
while ($index < @typevalue) {
|
while ($index < @typevalue) {
|
||||||
my $tv = $typevalue[$index];
|
my $tv = $typevalue[$index];
|
||||||
if (($tv =~ m/^(\C):\s*(.*)/)) {
|
if (($tv =~ m/^(.):\s*(.*)/)) {
|
||||||
last;
|
last;
|
||||||
}
|
}
|
||||||
$index++;
|
$index++;
|
||||||
@ -869,7 +869,7 @@ sub find_starting_index {
|
|||||||
|
|
||||||
while ($index > 0) {
|
while ($index > 0) {
|
||||||
my $tv = $typevalue[$index];
|
my $tv = $typevalue[$index];
|
||||||
if (!($tv =~ m/^(\C):\s*(.*)/)) {
|
if (!($tv =~ m/^(.):\s*(.*)/)) {
|
||||||
last;
|
last;
|
||||||
}
|
}
|
||||||
$index--;
|
$index--;
|
||||||
@ -883,7 +883,7 @@ sub find_ending_index {
|
|||||||
|
|
||||||
while ($index < @typevalue) {
|
while ($index < @typevalue) {
|
||||||
my $tv = $typevalue[$index];
|
my $tv = $typevalue[$index];
|
||||||
if (!($tv =~ m/^(\C):\s*(.*)/)) {
|
if (!($tv =~ m/^(.):\s*(.*)/)) {
|
||||||
last;
|
last;
|
||||||
}
|
}
|
||||||
$index++;
|
$index++;
|
||||||
@ -909,7 +909,7 @@ sub get_maintainer_role {
|
|||||||
|
|
||||||
for ($i = $start + 1; $i < $end; $i++) {
|
for ($i = $start + 1; $i < $end; $i++) {
|
||||||
my $tv = $typevalue[$i];
|
my $tv = $typevalue[$i];
|
||||||
if ($tv =~ m/^(\C):\s*(.*)/) {
|
if ($tv =~ m/^(.):\s*(.*)/) {
|
||||||
my $ptype = $1;
|
my $ptype = $1;
|
||||||
my $pvalue = $2;
|
my $pvalue = $2;
|
||||||
if ($ptype eq "S") {
|
if ($ptype eq "S") {
|
||||||
@ -968,7 +968,7 @@ sub add_categories {
|
|||||||
|
|
||||||
for ($i = $start + 1; $i < $end; $i++) {
|
for ($i = $start + 1; $i < $end; $i++) {
|
||||||
my $tv = $typevalue[$i];
|
my $tv = $typevalue[$i];
|
||||||
if ($tv =~ m/^(\C):\s*(.*)/) {
|
if ($tv =~ m/^(.):\s*(.*)/) {
|
||||||
my $ptype = $1;
|
my $ptype = $1;
|
||||||
my $pvalue = $2;
|
my $pvalue = $2;
|
||||||
if ($ptype eq "L") {
|
if ($ptype eq "L") {
|
||||||
@ -1010,7 +1010,7 @@ sub add_categories {
|
|||||||
if ($name eq "") {
|
if ($name eq "") {
|
||||||
if ($i > 0) {
|
if ($i > 0) {
|
||||||
my $tv = $typevalue[$i - 1];
|
my $tv = $typevalue[$i - 1];
|
||||||
if ($tv =~ m/^(\C):\s*(.*)/) {
|
if ($tv =~ m/^(.):\s*(.*)/) {
|
||||||
if ($1 eq "P") {
|
if ($1 eq "P") {
|
||||||
$name = $2;
|
$name = $2;
|
||||||
$pvalue = format_email($name, $address, $email_usename);
|
$pvalue = format_email($name, $address, $email_usename);
|
||||||
|
Loading…
Reference in New Issue
Block a user