qbit/pr-status-pl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

handle missing branch name

Browse Source
This commit is contained in:
Aaron Bieber 2023-05-23 10:38:27 -06:00
parent 83a23e3c00
commit a452199d40
No known key found for this signature in database
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pr-status.pl
View File

@ -91,10 +91,12 @@ sub figure_status {
# handle this stuff with a regex so we don't have to specify "22.11" kinda stuff # handle this stuff with a regex so we don't have to specify "22.11" kinda stuff
my @b = grep /$s/, @{$list}; my @b = grep /$s/, @{$list};
my $ns = $b[0]; my $ns = $b[0];
if ( defined $ns ) {
$status->{info}->{$ns} = JSON::false; $status->{info}->{$ns} = JSON::false;
$status->{info}->{$ns} = JSON::true if grep /^$s$/, @{$list}; $status->{info}->{$ns} = JSON::true if grep /^$s$/, @{$list};
} }
} }
}
foreach my $s ( keys %{ $status->{info} } ) { foreach my $s ( keys %{ $status->{info} } ) {
if ( $status->{info}->{$s} == JSON::false ) { if ( $status->{info}->{$s} == JSON::false ) {