From: Christian G. [M. Mitch] <mas...@us...> - 2002-01-20 13:37:19
|
Update of /cvsroot/jprojecttimer/jprojecttimer In directory usw-pr-cvs1:/tmp/cvs-serv17575 Modified Files: checkTranslation.pl Log Message: Error are now printed alphabetically sorted. Index: checkTranslation.pl =================================================================== RCS file: /cvsroot/jprojecttimer/jprojecttimer/checkTranslation.pl,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** checkTranslation.pl 2002/01/18 21:31:30 1.4 --- checkTranslation.pl 2002/01/20 13:37:17 1.5 *************** *** 37,41 **** print " multiple keys:\n"; ! foreach my $key (grep $file{$_} > 1, keys %file) { print "* $key\n"; $err++; --- 37,41 ---- print " multiple keys:\n"; ! foreach my $key (grep $file{$_} > 1, sort keys %file) { print "* $key\n"; $err++; *************** *** 43,47 **** print " additional keys:\n"; ! foreach my $key (grep ! $keywords{$_}, keys %file) { print "* $key\n"; $err++; --- 43,47 ---- print " additional keys:\n"; ! foreach my $key (grep ! $keywords{$_}, sort keys %file) { print "* $key\n"; $err++; *************** *** 49,53 **** print " missing keys:\n"; ! foreach my $key (grep ! $file{$_}, keys %keywords) { print "* $key\n"; $err++; --- 49,53 ---- print " missing keys:\n"; ! foreach my $key (grep ! $file{$_}, sort keys %keywords) { print "* $key\n"; $err++; |