changeset 7739:2850079ad35f

[gaim-migrate @ 8384] tweaked this a bit, so I don't beat on the CVS server so much when I update the translation page. committer: Tailor Script <tailor@pidgin.im>
author Nathan Walp <nwalp@pidgin.im>
date Thu, 04 Dec 2003 06:33:10 +0000
parents b14442b31a9b
children ddc450689c05
files po/stats.pl
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/po/stats.pl	Thu Dec 04 05:58:26 2003 +0000
+++ b/po/stats.pl	Thu Dec 04 06:33:10 2003 +0000
@@ -51,7 +51,9 @@
 foreach $index (0 .. $#pos) {
 	$trans = $fuzz = $untrans = 0;
 	$po = $pos[$index];
-	$_ = `msgfmt --statistics $po -o /dev/null 2>&1`;
+	print STDERR "$po..." if($ARGV[0] eq '-v');
+	system("msgmerge $po.po gaim.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; }
@@ -81,6 +83,8 @@
 	printf "<img src='bar_y.gif' height='15' width='%0.0f' />", $gonep*2
 	unless $gonep*2 < 0.5;
 	print "</tr>\n";
+	unlink("$po.new");
+	print STDERR "done.\n" if($ARGV[0] eq '-v');
 }
 print "</table></td></tr></table>\n";
 print "Latest gaim.pot generated $now: <a href='gaim.pot'>gaim.pot</a><br />\n";