Commit e4fae2e4 authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski

[searx] fix JSON write for Gargantext

parent c10476e2
Pipeline #1693 failed with stage
......@@ -72,7 +72,6 @@ instance Doc DataField where
doc Files = "Zip files with formats.."
derive instance Eq DataField
instance JSON.WriteForeign DataField where
writeImpl Gargantext = JSON.writeImpl "Internal PubMed"
writeImpl (External (Just db)) = JSON.writeImpl $ "External " <> show db
writeImpl Web = JSON.writeImpl $ "Web"
writeImpl f = JSON.writeImpl $ show f
......
......@@ -40,7 +40,6 @@ type CommonProps = ( dispatch :: Action -> Aff Unit, session :: Session )
nodePopupView :: Record NodePopupProps -> R.Element
nodePopupView p = R.createElement nodePopupCpt p []
nodePopupCpt :: R.Component NodePopupProps
nodePopupCpt = here.component "nodePopupView" cpt where
cpt p@{ id, name, nodeType } _ = do
......
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