mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-22 18:38:26 +00:00
Add japanese document language
This commit is contained in:
@ -29,6 +29,7 @@ type Language
|
||||
| Romanian
|
||||
| Dutch
|
||||
| Latvian
|
||||
| Japanese
|
||||
|
||||
|
||||
fromString : String -> Maybe Language
|
||||
@ -78,6 +79,9 @@ fromString str =
|
||||
else if str == "lav" || str == "lv" || str == "latvian" then
|
||||
Just Latvian
|
||||
|
||||
else if str == "jpn" || str == "ja" || str == "japanese" then
|
||||
Just Japanese
|
||||
|
||||
else
|
||||
Nothing
|
||||
|
||||
@ -130,6 +134,9 @@ toIso3 lang =
|
||||
Latvian ->
|
||||
"lav"
|
||||
|
||||
Japanese ->
|
||||
"jpn"
|
||||
|
||||
|
||||
all : List Language
|
||||
all =
|
||||
@ -148,4 +155,5 @@ all =
|
||||
, Russian
|
||||
, Romanian
|
||||
, Latvian
|
||||
, Japanese
|
||||
]
|
||||
|
@ -61,6 +61,9 @@ gb lang =
|
||||
Latvian ->
|
||||
"Latvian"
|
||||
|
||||
Japanese ->
|
||||
"Japanese"
|
||||
|
||||
|
||||
de : Language -> String
|
||||
de lang =
|
||||
@ -109,3 +112,6 @@ de lang =
|
||||
|
||||
Latvian ->
|
||||
"Lettisch"
|
||||
|
||||
Japanese ->
|
||||
"Japanisch"
|
||||
|
Reference in New Issue
Block a user