Index: po/stats.pl =================================================================== RCS file: /cvsroot/gaim/gaim/po/stats.pl,v retrieving revision 1.12 diff -u -p -r1.12 stats.pl --- po/stats.pl 27 Jun 2004 17:51:20 -0000 1.12 +++ po/stats.pl 14 Aug 2004 12:45:20 -0000 @@ -48,6 +48,7 @@ die "unable to get total: $!" unless (/( $total = $1; print "\n"; +print "$PACKAGE i18n statistics\n"; print "\n"; print "
\n"; @@ -60,9 +61,9 @@ foreach $index (0 .. $#pos) { system("msgmerge $po.po $PACKAGE.pot -o $po.new 2>/dev/null"); $_ = `msgfmt --statistics $po.new -o /dev/null 2>&1`; chomp; - if(/(\d+) translated messages/) { $trans = $1; } - if(/(\d+) fuzzy translations/) { $fuzz = $1; } - if(/(\d+) untranslated messages/) { $untrans = $1; } + if(/(\d+) translated message/) { $trans = $1; } + if(/(\d+) fuzzy translation/) { $fuzz = $1; } + if(/(\d+) untranslated message/) { $untrans = $1; } $transp = 100 * $trans / $total; $fuzzp = 100 * $fuzz / $total; $untransp = 100 * $untrans / $total;