- $status_oldstable = get_status($f, $bug, 'oldstable') if ($oldstable_tag);
- $status_stable = get_status($f, $bug, 'stable') if ($stable_tag);
- $status_testing = get_status($f, $bug, 'testing') if ($testing_tag);
- $status_unstable = get_status($f, $bug, 'unstable') if ($unstable_tag);
- $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" : "");
+ my $status_oldstable = get_status($f, $bug, 'oldstable') if ($oldstable_tag);
+ my $status_stable = get_status($f, $bug, 'stable') if ($stable_tag);
+ my $status_testing = get_status($f, $bug, 'testing') if ($testing_tag);
+ my $status_unstable = get_status($f, $bug, 'unstable') if ($unstable_tag);
+ my $status_experimental = get_status($f, $bug, 'experimental') if ($experimental_tag);
+
+ my $relinfo = "";
+ $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" : "");