mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-22 02:18:26 +00:00
Add latvian language
This commit is contained in:
@ -22,6 +22,7 @@ type Language
|
||||
| Russian
|
||||
| Romanian
|
||||
| Dutch
|
||||
| Latvian
|
||||
|
||||
|
||||
fromString : String -> Maybe Language
|
||||
@ -68,6 +69,9 @@ fromString str =
|
||||
else if str == "ron" || str == "ro" || str == "romanian" then
|
||||
Just Romanian
|
||||
|
||||
else if str == "lav" || str == "lv" || str == "latvian" then
|
||||
Just Latvian
|
||||
|
||||
else
|
||||
Nothing
|
||||
|
||||
@ -117,6 +121,9 @@ toIso3 lang =
|
||||
Dutch ->
|
||||
"nld"
|
||||
|
||||
Latvian ->
|
||||
"lav"
|
||||
|
||||
|
||||
toName : Language -> String
|
||||
toName lang =
|
||||
@ -163,6 +170,9 @@ toName lang =
|
||||
Dutch ->
|
||||
"Dutch"
|
||||
|
||||
Latvian ->
|
||||
"Latvian"
|
||||
|
||||
|
||||
all : List Language
|
||||
all =
|
||||
@ -180,4 +190,5 @@ all =
|
||||
, Swedish
|
||||
, Russian
|
||||
, Romanian
|
||||
, Latvian
|
||||
]
|
||||
|
Reference in New Issue
Block a user