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

[Aurimas Fišeras]

 wizards/source/euro/Init.xba |   24 ++++++++++++++++++++----
 wizards/source/euro/euro.src |    7 ++++++-
 2 files changed, 26 insertions(+), 5 deletions(-)

New commits:
commit 0b3e1d9b222bf045b03746f1c162bf8077a24a1b
Author: Aurimas Fišeras <auri...@members.fsf.org>
Date:   Sat Aug 23 12:12:12 2014 +0300

    added LTL Lithuanian Litas to Euro Converter
    
    Change-Id: Id4eeb42bbbaec979f60b57ddab2794b38f1e3157
    Reviewed-on: https://gerrit.libreoffice.org/11090
    Reviewed-by: Thomas Arnhold <tho...@arnhold.org>
    Tested-by: Thomas Arnhold <tho...@arnhold.org>

diff --git a/wizards/source/euro/Init.xba b/wizards/source/euro/Init.xba
index 33d9eb8..69226ed 100644
--- a/wizards/source/euro/Init.xba
+++ b/wizards/source/euro/Init.xba
@@ -90,6 +90,7 @@ Public sCurrMALTESE as String
 Public sCurrSLOVAK as String
 Public sCurrESTONIAN as String
 Public sCurrLATVIAN as String
+Public sCurrLITHUANIAN as String
 Public sCurrUNKNOWN as String
 Public sCurrSYSUNKNOWN as String
 
@@ -134,8 +135,8 @@ Public CurExtension(2) as String
 Public Currfactor as Double
 Public CurrSymbolList(2) as String
 Public CurrLanguage as String
-Public CurrValue(17,5)
-Public LangIDValue(17,2,2) as String
+Public CurrValue(18,5)
+Public LangIDValue(18,2,2) as String
 Public PreName as String
 Public Separator as String
 Public BitmapDir as String
@@ -216,8 +217,9 @@ Dim LocWorkPath as String
                sCurrSLOVAK = GetResText(1515)
                sCurrESTONIAN = GetResText(1516)
                sCurrLATVIAN = GetResText(1517)
-               sCurrUNKNOWN = GetResText(1518)
-               sCurrSYSUNKNOWN = GetResText(1519)
+               sCurrLITHUANIAN = GetResText(1518)
+               sCurrUNKNOWN = GetResText(1519)
+               sCurrSYSUNKNOWN = GetResText(1520)
                .cmdCancel.Label =  sCANCEL
                .cmdHelp.Label =  sHELP
                .cmdBack.Label =  GetResText(1002)
@@ -392,6 +394,11 @@ Sub InitializeLanguages()
     LangIDValue(17,1,1) = &quot;LV&quot;
     LangIDValue(17,1,2) = &quot;-64B&quot;
 
+&apos; CURRENCIES_LITHUANIAN
+    LangIDValue(18,0,0) = &quot;lt&quot;
+    LangIDValue(18,0,1) = &quot;LT&quot;
+    LangIDValue(18,0,2) = &quot;-427&quot;
+
 End Sub
 
 
@@ -562,6 +569,15 @@ Dim i as Integer
        CurrValue(17,4) = &quot;Ls&quot;
        CurrValue(17,5) = &quot;LVL&quot;
 
+       CurrValue(18,0) = sCurrLITHUANIAN
+       &apos; real conversion rate
+       CurrValue(18,1) = 3.45280
+       &apos; rounded conversion rate
+       CurrValue(18,2) = 3.5
+       CurrValue(18,3) = &quot;Lt&quot;
+       CurrValue(18,4) = &quot;Lt&quot;
+       CurrValue(18,5) = &quot;LTL&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 bf795ba..2280b75 100644
--- a/wizards/source/euro/euro.src
+++ b/wizards/source/euro/euro.src
@@ -412,11 +412,16 @@ Text [ en-US ] = "Latvian Lats";
 
 String CURRENCIES + 18
 {
-Text [ en-US ] = "The currency set for the document is not a European 
currency!";
+Text [ en-US ] = "Lithuanian Litas";
 };
 
 String CURRENCIES + 19
 {
+Text [ en-US ] = "The currency set for the document is not a European 
currency!";
+};
+
+String CURRENCIES + 20
+{
 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