realAscot/qelectrotech-source-mirror
realAscot/qelectrotech-source-mirror
1
0
Fork 0
mirror of https://github.com/qelectrotech/qelectrotech-source-mirror.git synced 2025-09-13 20:23:04 +02:00
Code Packages Releases 1 Activity

Trivial fixes in elements collection.

Browse Source 
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:
xavier 2011-03-10 21:05:09 +00:00
parent 15a2c9e7ce
commit b333b518be
3 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
elements/bornes/borne_continuite.elmt
View File

@ -7,7 +7,7 @@
<name lang="es">Punto de combinación</name>
<name lang="cs">Spojovací svorka</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>
</names>
<informations>Author: The QElectroTech team

2
elements/variateurs_de_frequence/siemens/qet_directory
View File

@ -3,6 +3,6 @@
<name lang="en">Siemens</name>
<name lang="fr">Siemens</name>
<name lang="pl">Siemens</name>
<name lang="it"ZSiemens</name>
<name lang="it">Siemens</name>
</names>
</qet-directory>

3
misc/translations_stat.pl
View File

@ -130,6 +130,7 @@ sub get_pattern_count_in_file {
sub analyze_element_file {
return if (($File::Find::name =~ m/\.svn/) || (! -f $_));
return if ($_ !~ m/(^qet_directory|\.elmt)$/);
# One more element, count it
our $elements_count;
@ -139,7 +140,7 @@ 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('<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'};
}
}