mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-22 02:18:26 +00:00
@ -34,6 +34,7 @@ type Language
|
||||
| Hungarian
|
||||
| Lithuanian
|
||||
| Polish
|
||||
| Estonian
|
||||
|
||||
|
||||
fromString : String -> Maybe Language
|
||||
@ -98,6 +99,9 @@ fromString str =
|
||||
else if str == "pol" || str == "pl" || str == "polish" then
|
||||
Just Polish
|
||||
|
||||
else if str == "est" || str == "et" || str == "estonian" then
|
||||
Just Estonian
|
||||
|
||||
else
|
||||
Nothing
|
||||
|
||||
@ -165,6 +169,9 @@ toIso3 lang =
|
||||
Polish ->
|
||||
"pol"
|
||||
|
||||
Estonian ->
|
||||
"est"
|
||||
|
||||
|
||||
all : List Language
|
||||
all =
|
||||
@ -188,4 +195,5 @@ all =
|
||||
, Hungarian
|
||||
, Lithuanian
|
||||
, Polish
|
||||
, Estonian
|
||||
]
|
||||
|
@ -77,6 +77,9 @@ gb lang =
|
||||
Polish ->
|
||||
"Polish"
|
||||
|
||||
Estonian ->
|
||||
"Estonian"
|
||||
|
||||
|
||||
de : Language -> String
|
||||
de lang =
|
||||
@ -141,6 +144,9 @@ de lang =
|
||||
Polish ->
|
||||
"Polnisch"
|
||||
|
||||
Estonian ->
|
||||
"Estnisch"
|
||||
|
||||
|
||||
fr : Language -> String
|
||||
fr lang =
|
||||
@ -204,3 +210,6 @@ fr lang =
|
||||
|
||||
Polish ->
|
||||
"Polonais"
|
||||
|
||||
Estonian ->
|
||||
"Estonien"
|
||||
|
Reference in New Issue
Block a user