add khmer lang to ui

This commit is contained in:
xshadowlegendx 2023-03-16 23:51:41 +07:00
parent 3511e1ef19
commit 7c6fc5dadd
2 changed files with 17 additions and 0 deletions

View File

@ -36,6 +36,7 @@ type Language
| Polish
| Estonian
| Ukrainian
| Khmer
fromString : String -> Maybe Language
@ -106,6 +107,9 @@ fromString str =
else if str == "ukr" || str == "uk" || str == "ukrainian" then
Just Ukrainian
else if str == "khm" || str == "kh" || str == "khmer" then
Just Khmer
else
Nothing
@ -179,6 +183,9 @@ toIso3 lang =
Ukrainian ->
"ukr"
Khmer ->
"khm"
all : List Language
all =
@ -204,4 +211,5 @@ all =
, Polish
, Estonian
, Ukrainian
, Khmer
]

View File

@ -83,6 +83,9 @@ gb lang =
Ukrainian ->
"Ukrainian"
Khmer ->
"Khmer"
de : Language -> String
de lang =
@ -153,6 +156,9 @@ de lang =
Ukrainian ->
"Ukrainisch"
Khmer ->
"Khmer"
fr : Language -> String
fr lang =
@ -222,3 +228,6 @@ fr lang =
Ukrainian ->
"Ukrainien"
Khmer ->
"Khmer"