X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=scanlib.pm;h=068b9b4fbc6e07e95469a7ed2c1b8dde3b261975;hp=1550007cb26fcc77c722704df54ba18976a7e896;hb=b959be8aaed10f60dc3b98411fca36982a1bd5cf;hpb=a56dfd870271c1aa46516ced24f5b2b2667024e5 diff --git a/scanlib.pm b/scanlib.pm index 1550007..068b9b4 100644 --- a/scanlib.pm +++ b/scanlib.pm @@ -225,11 +225,11 @@ sub scanspooldir() { $status_experimental = get_status($f, $bug, 'experimental') if ($experimental_tag); $relinfo = ""; - $relinfo .= (($oldstable_tag && $status_oldstable->{'pending'} eq 'pending') ? "O" : ""); - $relinfo .= (($stable_tag && $status_stable->{'pending'} eq 'pending') ? "S" : ""); - $relinfo .= (($testing_tag && $status_testing->{'pending'} eq 'pending') ? "T" : ""); - $relinfo .= (($unstable_tag && $status_unstable->{'pending'} eq 'pending') ? "U" : ""); - $relinfo .= (($experimental_tag && $status_experimental->{'pending'} eq 'pending') ? "E" : ""); + $relinfo .= (($oldstable_tag && $status_oldstable eq 'pending') ? "O" : ""); + $relinfo .= (($stable_tag && $status_stable eq 'pending') ? "S" : ""); + $relinfo .= (($testing_tag && $status_testing eq 'pending') ? "T" : ""); + $relinfo .= (($unstable_tag && $status_unstable eq 'pending') ? "U" : ""); + $relinfo .= (($experimental_tag && $status_experimental eq 'pending') ? "E" : ""); next if $relinfo eq '' and not $premature{$f}; $premature{$f}++ if $relinfo eq ''; @@ -389,8 +389,8 @@ sub get_status() { $status = 'done'; } } - if (length($bug{'done'}) and - (not @sourceversions or not @{$status{'fixed_versions'}})) { + if (length($bug->{'done'}) and + (not @sourceversions or not @{$bug->{'fixed_versions'}})) { $status = 'done'; }