Commit f23d8eb9 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[ERGO] order of databases

parent c9d099e5
......@@ -46,8 +46,8 @@ class Doc a where
dataFields :: Array DataField
dataFields = [ Gargantext
, Web
, External Nothing
, Web
-- , Files
]
......@@ -59,8 +59,8 @@ data DataField = Gargantext
instance showDataField :: Show DataField where
show Gargantext = "Gargantext"
show (External _) = "Others" -- <> show x
show Web = "Web"
show (External _) = "Databases (APIs)" -- <> show x
show Web = "Soon: web"
show Files = "Files"
instance docDataField :: Doc DataField where
......
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