diff options
Diffstat (limited to 'emi')
| -rwxr-xr-x | emi | 21 |
1 files changed, 13 insertions, 8 deletions
@@ -132,14 +132,19 @@ sub done_func { my $section = "$m/$s"; - if ($r =~ /(\d{14}\.\w+\.\w+\.\d+)_(.*)\.done$/) { - my ($prefix, $arch) = ($1, $2); - $archdone{$prefix}{$section}{$arch} = 1; - } elsif ($r =~ /(\d{14}\.\w+\.\w+\.\d+)_(.*)\.excluded$/) { - my ($prefix, $arch) = ($1, $2); - $arch = $config->{arch_translation}{$arch} if $config->{arch_translation}{$arch}; - plog('DEBUG', "found .excluded ($prefix)"); - $excluded{$prefix}{$section}{$arch} = 1; + if ($r =~ /^(\d{14}\.\w+\.\w+\.\d+)([_.].+)$/) { + my ($prefix, $suffix) = ($1, $2); + if ($suffix =~ /^_(\w+)\.(\w+)$/) { + my ($arch, $result) = ($1, $2); + if ($result eq 'done') { + plog('DEBUG', "found .done ($prefix) for $arch"); + $archdone{$prefix}{$section}{$arch} = 1; + } elsif ($result eq 'excluded') { + $arch = $config->{arch_translation}{$arch} if $config->{arch_translation}{$arch}; + plog('DEBUG', "found .excluded ($prefix) for $arch"); + $excluded{$prefix}{$section}{$arch} = 1; + } + } } } |