commit 5439f4e554c537174bb17661a9d4a823210ddee7
Author: Kornel Benko <[email protected]>
Date: Sun Oct 25 16:23:59 2015 +0100
Cmake tests: Combine "text" field to extract translators name
While extracting names of a translator from the html page it can happen
that the perl's HTML::Parser module splits the "text".
diff --git a/development/checkurls/getTranslators.pl
b/development/checkurls/getTranslators.pl
old mode 100644
new mode 100755
index ac60a61..db5e914
--- a/development/checkurls/getTranslators.pl
+++ b/development/checkurls/getTranslators.pl
@@ -141,7 +141,7 @@ else {
for my $lang (sort keys %list) {
for my $rentry (@{$list{$lang}}) {
- my $prefix = sprintf("(%02d%) ", "$rentry->{fract}");
+ my $prefix = sprintf("(%03d%) ", "$rentry->{fract}");
if (defined($rentry->{error})) {
$errors++;
$prefix .= sprintf("%-24s", "$rentry->{error}:");
@@ -268,10 +268,10 @@ sub text($$)
}
if ($status{Tag_td} == 6) {
if (&actual_tag() eq "a") {
- $page_row{name} = $text;
+ $page_row{name} .= $text; # '.=' because text can be splitted
}
elsif (&actual_tag() eq "td") { # name without associated e-mail
- $page_row{name} = $text;
+ $page_row{name} .= $text;
}
}
}