Commit 04284d2a authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] Add langs

parent f027bd5e
Pipeline #3917 failed with stage
in 0 seconds
......@@ -23,18 +23,33 @@ here = R2.here "Gargantext.Components.Lang"
-- Language used for search
allLangs :: Array Lang
allLangs = [ EN
, FR
allLangs = [ Universal
, No_extraction
, DE
, EL
, EN
, ES
, FR
, IT
, PL
, CN
, Universal
, No_extraction
, PT
, RU
, UK
, ZH
]
data Lang = CN | DE | EN | ES | FR | IT | PL | Universal | No_extraction
data Lang = Universal | No_extraction
| DE
| EL
| EN
| ES
| FR
| IT
| PL
| PT
| RU
| UK
| ZH
derive instance Generic Lang _
derive instance Ord Lang
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment