* Only map to english if there are more priorities than tags

   (closes: #372936)

diff --git a/cgi/pkgreport.cgi b/cgi/pkgreport.cgi
index 4dbd04dc667383605d7088d9f8a82a9264acd5c8..ba895243bf8a5e915229972386b60c562fc3e18d 100755 (executable)
--- a/cgi/pkgreport.cgi
+++ b/cgi/pkgreport.cgi
@@ -1083,7 +1083,9 @@ sub determine_ordering {
             push @order, [ 0..$#{$prior[-1]} ];
         }
         my @t = @{ $c->{"ttl"} } if defined $c->{ttl};
-        push @t, map { toenglish($prior[-1]->[$_]) } ($#t+1)..($#{$prior[-1]});
+       if (($#t+1) < $#{$prior[-1]}) {
+            push @t, map { toenglish($prior[-1]->[$_]) } ($#t+1)..($#{$prior[-1]});
+       }
        push @t, $c->{"def"} || "";
         push @title, [@t];
     }