# HG changeset patch
# User Nathan Walp <nwalp@pidgin.im>
# Date 1070519590 0
# Node ID 2850079ad35f5682198ed22d0cb5c710a7851128
# Parent  b14442b31a9b4fd871c81692c7ec27c1de228786
[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>

diff -r b14442b31a9b -r 2850079ad35f po/stats.pl
--- 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";