diff --git a/misc/translations_stat.pl b/misc/translations_stat.pl index f3eb069d2..296d92a66 100755 --- a/misc/translations_stat.pl +++ b/misc/translations_stat.pl @@ -140,8 +140,11 @@ sub analyze_element_file { my $file = $_; our %languages; for my $lang_key (our @ordered_languages) { - if (get_pattern_count_in_file('file' => $file, 'pattern' => sprintf('', $lang_key, 'limit' => 1)) == 1) { + my $translations_count = get_pattern_count_in_file('file' => $file, 'pattern' => sprintf('', $lang_key)); + if ($translations_count == 1) { ++ $languages{$lang_key}{'translated_elements_count'}; + } elsif ($translations_count > 1) { + print STDERR "Multiple translation in $File::Find::name\n"; } } }