Add support for Slovak language

Just the basic support was added following examples for other languages.
This commit is contained in:
Miroslav Prasil
2023-08-03 14:20:27 +01:00
parent 3199da7044
commit 8826712259
9 changed files with 119 additions and 1 deletions

View File

@ -37,6 +37,7 @@ type Language
| Estonian
| Ukrainian
| Khmer
| Slovak
fromString : String -> Maybe Language
@ -110,6 +111,9 @@ fromString str =
else if str == "khm" || str == "kh" || str == "khmer" then
Just Khmer
else if str == "svk" || str == "sk" || str == "slovak" then
Just Slovak
else
Nothing
@ -186,6 +190,9 @@ toIso3 lang =
Khmer ->
"khm"
Slovak ->
"svk"
all : List Language
all =
@ -212,4 +219,5 @@ all =
, Estonian
, Ukrainian
, Khmer
, Slovak
]

View File

@ -86,6 +86,9 @@ gb lang =
Khmer ->
"Khmer"
Slovak ->
"Slovak"
de : Language -> String
de lang =
@ -159,6 +162,9 @@ de lang =
Khmer ->
"Khmer"
Slovak ->
"Slowakisch"
fr : Language -> String
fr lang =
@ -231,3 +237,6 @@ fr lang =
Khmer ->
"Khmer"
Slovak ->
"Slovaquie"