Slightly better warning reporting.

OK, done for now.


git-svn-id: svn://svn.lyx.org/lyx/lyx-devel/trunk@38270 a592a061-630c-0410-9148-cb99ea01b6c8
This commit is contained in:
Richard Heck 2011-04-05 23:02:12 +00:00
parent c1217970d1
commit 2fd9eec0da

View File

@ -214,7 +214,13 @@ foreach my $pofilename ( @ARGV ) {
} }
} }
if ($warn) {
while (my ($k, $v) = each %bad) { print "$k: $v\n"; }
if (scalar(keys %bad) > 1) {
print "Total warnings: $warn\n";
}
} else {
print "No warnings!\n";
}
print "\n"; print "\n";
while (my ($k, $v) = each %bad) { print "$k: $v warnings\n"; }
print "Total number of warnings: $warn\n\n";
} }