[Libreoffice-commits] core.git: wizards/source

[Eike Rathke]

 wizards/source/euro/Init.xba |   34 +++++++++++++++++++++++++++-------
 wizards/source/euro/euro.src |    7 ++++++-
 2 files changed, 33 insertions(+), 8 deletions(-)

New commits:
commit 5bf0a838e800605e95b5b03157bdf0780db497e6
Author: Eike Rathke <er...@redhat.com>
Date:   Fri Jan 3 01:56:43 2014 +0100

    added LVL Latvian Lats to Euro Converter, fdo#73239
    
    Change-Id: Icc6f9c40a39f08bb0bcbed6d25c99f0e67cb608c

diff --git a/wizards/source/euro/Init.xba b/wizards/source/euro/Init.xba
index d01d500..33d9eb8 100644
--- a/wizards/source/euro/Init.xba
+++ b/wizards/source/euro/Init.xba
@@ -89,6 +89,7 @@ Public sCurrCYPRIOT as String
 Public sCurrMALTESE as String
 Public sCurrSLOVAK as String
 Public sCurrESTONIAN as String
+Public sCurrLATVIAN as String
 Public sCurrUNKNOWN as String
 Public sCurrSYSUNKNOWN as String
 
@@ -133,8 +134,8 @@ Public CurExtension(2) as String
 Public Currfactor as Double
 Public CurrSymbolList(2) as String
 Public CurrLanguage as String
-Public CurrValue(16,5)
-Public LangIDValue(16,2,2) as String
+Public CurrValue(17,5)
+Public LangIDValue(17,2,2) as String
 Public PreName as String
 Public Separator as String
 Public BitmapDir as String
@@ -214,8 +215,9 @@ Dim LocWorkPath as String
                sCurrMALTESE = GetResText(1514)
                sCurrSLOVAK = GetResText(1515)
                sCurrESTONIAN = GetResText(1516)
-               sCurrUNKNOWN = GetResText(1517)
-               sCurrSYSUNKNOWN = GetResText(1518)
+               sCurrLATVIAN = GetResText(1517)
+               sCurrUNKNOWN = GetResText(1518)
+               sCurrSYSUNKNOWN = GetResText(1519)
                .cmdCancel.Label =  sCANCEL
                .cmdHelp.Label =  sHELP
                .cmdBack.Label =  GetResText(1002)
@@ -377,9 +379,18 @@ Sub InitializeLanguages()
        LangIDValue(15,0,2) = &quot;-41B&quot;
 
 &apos; CURRENCIES_ESTONIAN
-       LangIDValue(16,0,0) = &quot;et&quot;
-       LangIDValue(16,0,1) = &quot;ET&quot;
-       LangIDValue(16,0,2) = &quot;-425&quot;
+    LangIDValue(16,0,0) = &quot;et&quot;
+    LangIDValue(16,0,1) = &quot;ET&quot;
+    LangIDValue(16,0,2) = &quot;-425&quot;
+
+&apos; CURRENCIES_LATVIAN
+    LangIDValue(17,0,0) = &quot;lv&quot;
+    LangIDValue(17,0,1) = &quot;LV&quot;
+    LangIDValue(17,0,2) = &quot;-426&quot;
+    &apos; and Latgalian
+    LangIDValue(17,1,0) = &quot;ltg&quot;
+    LangIDValue(17,1,1) = &quot;LV&quot;
+    LangIDValue(17,1,2) = &quot;-64B&quot;
 
 End Sub
 
@@ -542,6 +553,15 @@ Dim i as Integer
        CurrValue(16,4) = &quot;kr&quot;
        CurrValue(16,5) = &quot;EEK&quot;
 
+       CurrValue(17,0) = sCurrLATVIAN
+       &apos; real conversion rate
+       CurrValue(17,1) = 0.702804
+       &apos; rounded conversion rate
+       CurrValue(17,2) = 0.7
+       CurrValue(17,3) = &quot;Ls&quot;
+       CurrValue(17,4) = &quot;Ls&quot;
+       CurrValue(17,5) = &quot;LVL&quot;
+
        i = -1
        CurrSymbolList(0) = &quot;&quot;
        CurrSymbolList(1) = &quot;&quot;
diff --git a/wizards/source/euro/euro.src b/wizards/source/euro/euro.src
index 0a42451..9db7204 100644
--- a/wizards/source/euro/euro.src
+++ b/wizards/source/euro/euro.src
@@ -438,11 +438,16 @@ Text [ en-US ] = "Estonian Kroon";
 
 String CURRENCIES + 17
 {
-Text [ en-US ] = "The currency set for the document is not a European 
currency!";
+Text [ en-US ] = "Latvian Lats";
 };
 
 String CURRENCIES + 18
 {
+Text [ en-US ] = "The currency set for the document is not a European 
currency!";
+};
+
+String CURRENCIES + 19
+{
 Text [ en-US ] = "The language set for your operating system is not a language 
of the European Monetary Union.";
 };
 
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits