summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
authorAurimas Fišeras <aurimas@members.fsf.org>2014-08-23 12:12:12 +0300
committerAndras Timar <andras.timar@collabora.com>2014-12-13 16:00:38 +0100
commite998ffbe31af145ca20de07dcff8ff61fd77dafa (patch)
treec43e5fe78476b109955991928907df38e69048a0 /wizards
parent8c3a20512738184236cd18fd4a58dade7b38553d (diff)
added LTL Lithuanian Litas to Euro Converter
Reviewed-on: https://gerrit.libreoffice.org/11090 Reviewed-by: Thomas Arnhold <thomas@arnhold.org> Tested-by: Thomas Arnhold <thomas@arnhold.org> (cherry picked from commit 0b3e1d9b222bf045b03746f1c162bf8077a24a1b) adapt SBCOUNTRYCOUNT (cherry picked from commit 375228c2c811412b516fe29bf263a520f4e9be1a) ditch unused sCurrUNKNOWN and sCurrSYSUNKNOWN strings (cherry picked from commit 99e1b398f28ee8eb2fc2d6bf5db8362170f32e69) increment SBCOUNTRYCOUNT again, we have 19 currencies 0..18 (cherry picked from commit dfb48f77ba011661e03b6eb942234adb4e6630d7) Change-Id: Id4eeb42bbbaec979f60b57ddab2794b38f1e3157 Reviewed-on: https://gerrit.libreoffice.org/12952 Reviewed-by: Adolfo Jayme Barrientos <fitojb@ubuntu.com> Reviewed-by: Caolán McNamara <caolanm@redhat.com> Tested-by: Caolán McNamara <caolanm@redhat.com>
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/euro/Init.xba26
-rw-r--r--wizards/source/euro/euro.src7
2 files changed, 20 insertions, 13 deletions
diff --git a/wizards/source/euro/Init.xba b/wizards/source/euro/Init.xba
index 33d9eb896fd0..ccd63b754b2b 100644
--- a/wizards/source/euro/Init.xba
+++ b/wizards/source/euro/Init.xba
@@ -90,15 +90,14 @@ Public sCurrMALTESE as String
Public sCurrSLOVAK as String
Public sCurrESTONIAN as String
Public sCurrLATVIAN as String
-Public sCurrUNKNOWN as String
-Public sCurrSYSUNKNOWN as String
+Public sCurrLITHUANIAN as String
Public sPrgsRETRIEVAL as String
Public sPrgsCONVERTING as String
Public sPrgsUNPROTECT as String
Public sInclusiveSubDir as String
-Public Const SBCOUNTRYCOUNT = 17
+Public Const SBCOUNTRYCOUNT = 19
Public CurMimeType as String
Public CurCellCount as Long
Public oSheets as Object
@@ -134,8 +133,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 +215,7 @@ Dim LocWorkPath as String
sCurrSLOVAK = GetResText(1515)
sCurrESTONIAN = GetResText(1516)
sCurrLATVIAN = GetResText(1517)
- sCurrUNKNOWN = GetResText(1518)
- sCurrSYSUNKNOWN = GetResText(1519)
+ sCurrLITHUANIAN = GetResText(1518)
.cmdCancel.Label = sCANCEL
.cmdHelp.Label = sHELP
.cmdBack.Label = GetResText(1002)
@@ -392,6 +390,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 +565,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 bf795ba73c26..0f1b44b2584b 100644
--- a/wizards/source/euro/euro.src
+++ b/wizards/source/euro/euro.src
@@ -412,12 +412,7 @@ 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.";
+Text [ en-US ] = "Lithuanian Litas";
};
String STEP_LASTPAGE