Update current review and report generation script.

This commit is contained in:
brectanus
2008-01-08 16:23:01 +00:00
parent c622e7ec93
commit 4473e483c1
2 changed files with 722 additions and 5 deletions

View File

@@ -29,7 +29,7 @@ for my $rec (values %{$review->{ReviewIssue} || {}}) {
# Write report
for my $fn (@ARGV ? (@ARGV) : (keys %ISSUES)) {
for my $fn (@ARGV ? (@ARGV) : (sort keys %ISSUES)) {
print "File: $fn\n";
print "===================================================================\n";
for my $r (sort { $a->{File}->{line} <=> $b->{File}->{line} || $a->{ReviewerId} cmp $b->{ReviewerId} } @{$ISSUES{$fn} || []}) {