use '_' instead of '-' in file names of .properties files

2012-01-03 18:11:13 +01:00
parent 865c12c795
commit 297502d232
1 changed files with 2 additions and 0 deletions
--- a/l10ntools/scripts/propmerge
+++ b/l10ntools/scripts/propmerge
@@ -63,7 +63,9 @@ close (SDFFILE);

 foreach my $lang (keys %languages) {
    my $locfilename = $options{i};
+    $lang =~ s/-/_/;
    $locfilename =~ s/en_US\.properties/$lang.properties/;
+    $lang =~ s/_/-/;
    open (INFILE, "<$options{i}") || die "propmerge: cannot open source file: $options{i}";    
    open (OUTFILE, ">$locfilename") || die "propmerge: cannot open output file: $locfilename";
    while (<INFILE>) {