[PATCH libreoffice-3-6] fdo#58283 produce all translations for desktop files

[David Tardon (via Code Review)]

Hi,

I have submitted a patch for review:

    https://gerrit.libreoffice.org/2162

To pull it, you can do:

    git pull ssh://gerrit.libreoffice.org:29418/core refs/changes/62/2162/1

fdo#58283 produce all translations for desktop files

Change-Id: Ie97e1ae7b2cc059630cba682a051eefff3ca044b
(cherry picked from commit 4a6f1853a2a15b938575406feada108443257536)
---
M sysui/desktop/share/translate.pl
1 file changed, 14 insertions(+), 11 deletions(-)



diff --git a/sysui/desktop/share/translate.pl b/sysui/desktop/share/translate.pl
index c55ee25..f67cb58 100755
--- a/sysui/desktop/share/translate.pl
+++ b/sysui/desktop/share/translate.pl
@@ -85,6 +85,8 @@
         # For every section in the specified ulf file there should exist
         # a template file in $workdir ..
         $entry{'outfile'} = "$workdir/$prefix$template.$ext";
+        my %translations;
+        $entry{'translations'} = \%translations;
         $templates{$template} = \%entry;
     } else {
         # split locale = "value" into 2 strings
@@ -102,8 +104,7 @@
 
             $locale=~s/-/_/;
 
-            $templates{$template}->{'locale'} = $locale;
-            $templates{$template}->{'value'} = $value;
+            $templates{$template}->{'translations'}->{$locale} = $value;
         }
     }
 }
@@ -134,15 +135,17 @@
         $keyline =~ s/^$key/$outkey/;
         print OUTFILE $keyline;
         if (/$key/) {
-            my $locale = $templates{$template}->{'locale'};
-            my $value = $templates{$template}->{'value'};
-            print "locale is $locale\n";
-            print "value is $value\n";
-            if ($value) {
-                if ($ext eq "desktop") {
-                    print OUTFILE "$outkey\[$locale\]=$value\n";
-                } else {
-                    print OUTFILE "\t\[$locale\]$outkey=$value\n";
+            my $translations = $templates{$template}->{'translations'};
+            foreach my $locale (keys %{$translations}) {
+                my $value = $translations->{$locale};
+                print "locale is $locale\n";
+                print "value is $value\n";
+                if ($value) {
+                    if ($ext eq "desktop") {
+                        print OUTFILE "$outkey\[$locale\]=$value\n";
+                    } else {
+                        print OUTFILE "\t\[$locale\]$outkey=$value\n";
+                    }
                 }
             }
         }

-- 
To view, visit https://gerrit.libreoffice.org/2162
To unsubscribe, visit https://gerrit.libreoffice.org/settings

Gerrit-MessageType: newchange
Gerrit-Change-Id: Ie97e1ae7b2cc059630cba682a051eefff3ca044b
Gerrit-PatchSet: 1
Gerrit-Project: core
Gerrit-Branch: libreoffice-3-6
Gerrit-Owner: David Tardon <dtardon at redhat.com>