From 8a9cb768685232a72899d3cc3224e5b03c69a076 Mon Sep 17 00:00:00 2001 From: "Juergen E. Fischer" Date: Mon, 13 Feb 2012 03:36:55 +0100 Subject: [PATCH] update tsstat.pl --- scripts/tsstat.pl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/scripts/tsstat.pl b/scripts/tsstat.pl index bb293dadb76..48b2ba86b0b 100644 --- a/scripts/tsstat.pl +++ b/scripts/tsstat.pl @@ -6,7 +6,7 @@ use Locale::Country; my @lang; -print "{| border='1' \n |Language||Count||Translated||Translation finished||Translation unfinished||Untranslated||Percentage \n |- \n"; +print "|Language|Count|Translated|Translation finished|Translation unfinished|Untranslated|Percentage|\n"; for my $i () { my ($langcode) = $i =~ /i18n\/qgis_(.*).ts/; @@ -44,6 +44,5 @@ for my $i () { for my $l (sort { $b->{percentage} <=> $a->{percentage} } @lang) { - print "|", $l->{name}, "||", join("||", $l->{n}, $l->{translations}, $l->{finished}, $l->{unfinished}, $l->{untranslated}, sprintf("%.1f", $l->{percentage}) ), "\n", "|-\n"; + print "|", $l->{name}, "|", join("|", $l->{n}, $l->{translations}, $l->{finished}, $l->{unfinished}, $l->{untranslated}, sprintf("%.1f", $l->{percentage}) ), "|\n"; } -print "|}","\n";