commit b1a2f727ca99ecd3402d4b051b99cbfd24266e59
author Eike Rathke <erack@redhat.com> Fri Jul 22 22:17:11 2022 +0200
committer Eike Rathke <erack@redhat.com> Sat Jul 23 02:18:41 2022 +0200
tree beca0b2fbfb6f6b3dcec9659f725fbd93b83ed47
parent 7c4b2db21ef77b37daf234ac1ab9989234606a22

Related: tdf#150011 Add HRK Croatian Kuna to Euro conversion wizard

Maybe just for completeness, it's removed from menu but might be
callable as macro.

Change-Id: Iade0be845186d3deb2f00f4aaa230c0b344cea72
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/137372
Reviewed-by: Eike Rathke <erack@redhat.com>
Tested-by: Jenkins

wizards/source/euro/Init.xba

diff --git a/wizards/source/euro/Init.xba b/wizards/source/euro/Init.xba
index 623a0a5..9f56c50 100644
--- a/wizards/source/euro/Init.xba
+++ b/wizards/source/euro/Init.xba
@@ -89,6 +89,7 @@ Public sCurrSLOVAK as String
Public sCurrESTONIAN as String
Public sCurrLATVIAN as String
Public sCurrLITHUANIAN as String
Public sCurrCROATIAN as String

Public sPrgsRETRIEVAL as String
Public sPrgsCONVERTING as String
@@ -214,6 +215,7 @@ Dim LocWorkPath as String
		sCurrESTONIAN = GetResText("CURRENCIES_16")
		sCurrLATVIAN = GetResText("CURRENCIES_17")
		sCurrLITHUANIAN = GetResText("CURRENCIES_18")
		sCurrCROATIAN = GetResText("CURRENCIES_19")
		.cmdCancel.Label =  sCANCEL
		.cmdHelp.Label =  sHELP
		.cmdBack.Label =  GetResText("STEP_ZERO_2")
@@ -393,6 +395,11 @@ Sub InitializeLanguages()
    LangIDValue(18,0,1) = "LT"
    LangIDValue(18,0,2) = "-427"

' CURRENCIES_CROATIAN
    LangIDValue(19,0,0) = "hr"
    LangIDValue(19,0,1) = "HR"
    LangIDValue(19,0,2) = "-41A"

End Sub


@@ -572,6 +579,15 @@ Dim i as Integer
	CurrValue(18,4) = "Lt"
	CurrValue(18,5) = "LTL"

	CurrValue(19,0) = sCurrCROATIAN
	' real conversion rate
	CurrValue(19,1) = 7.53450
	' rounded conversion rate
	CurrValue(19,2) = 7.5
	CurrValue(19,3) = "kn"
	CurrValue(19,4) = "kn"
	CurrValue(19,5) = "HRK"

	i = -1
	CurrSymbolList(0) = ""
	CurrSymbolList(1) = ""

wizards/source/resources/resources_en_US.properties

diff --git a/wizards/source/resources/resources_en_US.properties b/wizards/source/resources/resources_en_US.properties
index 32f9104..8649b25 100644
--- a/wizards/source/resources/resources_en_US.properties
+++ b/wizards/source/resources/resources_en_US.properties
@@ -448,6 +448,7 @@ CURRENCIES_15=Slovak Koruna
CURRENCIES_16=Estonian Kroon
CURRENCIES_17=Latvian Lats
CURRENCIES_18=Lithuanian Litas
CURRENCIES_19=Croatian Kuna
STEP_LASTPAGE_0=Progress
STEP_LASTPAGE_1=Retrieving the relevant documents...
STEP_LASTPAGE_2=Converting the documents...