mirror of
https://github.com/qelectrotech/qelectrotech-source-mirror.git
synced 2025-09-14 20:33:05 +02:00
Trivial fixes in elements collection.
Slightly improved translations_stat script. git-svn-id: svn+ssh://svn.tuxfamily.org/svnroot/qet/qet/branches/0.3@1208 bfdf4180-ca20-0410-9c96-a3a8aa849046
This commit is contained in:
parent
15a2c9e7ce
commit
b333b518be
@ -7,7 +7,7 @@
|
|||||||
<name lang="es">Punto de combinación</name>
|
<name lang="es">Punto de combinación</name>
|
||||||
<name lang="cs">Spojovací svorka</name>
|
<name lang="cs">Spojovací svorka</name>
|
||||||
<name lang="pt">Terminal de combinação</name>
|
<name lang="pt">Terminal de combinação</name>
|
||||||
<name lang="pl" >Zacisk</name>
|
<name lang="pl">Zacisk</name>
|
||||||
<name lang="it">Terminale di unione</name>
|
<name lang="it">Terminale di unione</name>
|
||||||
</names>
|
</names>
|
||||||
<informations>Author: The QElectroTech team
|
<informations>Author: The QElectroTech team
|
||||||
|
@ -3,6 +3,6 @@
|
|||||||
<name lang="en">Siemens</name>
|
<name lang="en">Siemens</name>
|
||||||
<name lang="fr">Siemens</name>
|
<name lang="fr">Siemens</name>
|
||||||
<name lang="pl">Siemens</name>
|
<name lang="pl">Siemens</name>
|
||||||
<name lang="it"ZSiemens</name>
|
<name lang="it">Siemens</name>
|
||||||
</names>
|
</names>
|
||||||
</qet-directory>
|
</qet-directory>
|
||||||
|
@ -130,6 +130,7 @@ sub get_pattern_count_in_file {
|
|||||||
|
|
||||||
sub analyze_element_file {
|
sub analyze_element_file {
|
||||||
return if (($File::Find::name =~ m/\.svn/) || (! -f $_));
|
return if (($File::Find::name =~ m/\.svn/) || (! -f $_));
|
||||||
|
return if ($_ !~ m/(^qet_directory|\.elmt)$/);
|
||||||
|
|
||||||
# One more element, count it
|
# One more element, count it
|
||||||
our $elements_count;
|
our $elements_count;
|
||||||
@ -139,7 +140,7 @@ sub analyze_element_file {
|
|||||||
my $file = $_;
|
my $file = $_;
|
||||||
our %languages;
|
our %languages;
|
||||||
for my $lang_key (our @ordered_languages) {
|
for my $lang_key (our @ordered_languages) {
|
||||||
if (get_pattern_count_in_file('file' => $file, 'pattern' => sprintf('<name lang="%s">', $lang_key, 'limit' => 1)) == 1) {
|
if (get_pattern_count_in_file('file' => $file, 'pattern' => sprintf('<name\s+lang="%s"\s*>', $lang_key, 'limit' => 1)) == 1) {
|
||||||
++ $languages{$lang_key}{'translated_elements_count'};
|
++ $languages{$lang_key}{'translated_elements_count'};
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user