Skip to content

P
purescript-gargantext
Commit e14d6fa1 authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[FEAT] External APIs HAL AND IsTex (fixed)

parent f1080643
Hide whitespace changes
Inline Side-by-side
Showing with 10 additions and 5 deletions
src/Gargantext/Components/Search/Types.purs
View file @ e14d6fa1
...@@ -24,7 +24,12 @@ import Gargantext.Utils (id) ...@@ -24,7 +24,12 @@ import Gargantext.Utils (id)
import URI.Extra.QueryPairs as QP import URI.Extra.QueryPairs as QP
allDatabases :: Array Database allDatabases :: Array Database
allDatabases = [All, PubMed, Isidore_EN, Isidore_FR] allDatabases = [All, PubMed
, HAL_EN
, HAL_FR
, IsTex_EN
, IsTex_FR
, Isidore_EN, Isidore_FR]
data Database = All | PubMed data Database = All | PubMed
| HAL_EN | HAL_FR | HAL_EN | HAL_FR
...@@ -42,11 +47,11 @@ instance showDatabase :: Show Database where ...@@ -42,11 +47,11 @@ instance showDatabase :: Show Database where
show All = "All" show All = "All"
show PubMed = "PubMed" show PubMed = "PubMed"
show HAL_EN = "HAL" <> show EN show HAL_EN = "HAL_" <> show EN
show HAL_FR = "HAL" <> show FR show HAL_FR = "HAL_" <> show FR
show IsTex_EN = "IsTex" <> show EN show IsTex_EN = "IsTex_" <> show EN
show IsTex_FR = "Istex" <> show FR show IsTex_FR = "Istex_" <> show FR
show Isidore_EN = "Isidore_" <> show EN show Isidore_EN = "Isidore_" <> show EN
show Isidore_FR = "Isidore_" <> show FR show Isidore_FR = "Isidore_" <> show FR
......
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