mirrors/neutrino
1
0
Fork 0
mirror of https://github.com/tuxbox-neutrino/neutrino.git synced 2025-08-31 01:11:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

if line numbers does not match but translations are correct

Browse Source
This commit is contained in:
JohnnyRun
2015-03-15 12:07:01 +01:00
parent 1b70ea748b
commit 3be7fe3bf8
1 changed files with 27 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

46
data/locale/helpers/create-locals-work
View File

@@ -20,31 +20,37 @@ open(masterfile, $masterfilename) || die("Could not open master file");
open(localefile, $localefilename) || die("Could not open locale file");
open(outfile, ">" . $outfilename) || die("Could not open output file");
%master = {};
%locale = {};
while (<masterfile>) {
$masterline = $_;
($masterkey) = /([^ ]+)/;
($junk, $mastertext) = /([^ ]+)[ ]+([^\n]+)/;
if ($last_was_ok) {
$localeline = <localefile>;
chop $localeline;
($localekey) = ($localeline =~ /([^ ]+)/,$localline);
($junk, $localetext) = ($localeline =~ /([^ ]+)[ ]+([^\n]+)/);
};
if ($masterkey eq $localekey) {
print outfile $localeline, "\n";
$last_was_ok = 1;
# master hash
$line = $_;
($key) = /([^ ]+)/;
($junk, $text) = /([^ ]+)[ ]+([^\n]+)/;
$master{$key} = $text;
}
while (<localefile>) {
# locale hash
$line = $_;
($key) = /([^ ]+)/;
($junk, $text) = /([^ ]+)[ ]+([^\n]+)/;
$locale{$key} = $text;
}
foreach $term (sort keys %master) {
if (exists $locale{$term}) {
print outfile $term, " ", $locale{$term}, "\n";
} else {
# not found
$no_errors++;
#print "|", $masterkey, "|", $mastertext, "|", $localekey, "|", $localetext, "|\n";
print outfile $masterkey, " TRANSLATE ", $mastertext, "\n";
$last_was_ok = 0;
print outfile $term, " TRANSLATE ", $master{$term}, "\n";
}
}
close(outfile);
print "There were ", $no_errors, " error(s) in ", $localefilename, ".\n";
if ($no_errors == 0) {
if ($no_errors == 0) {}
unlink($outfilename);
} else {
print "There were ", $no_errors, " error(s) in ", $localefilename, ".\n";
}