[openalex] Database type fixed

parent 0c0dd385
Pipeline #4308 canceled with stages
...@@ -92,7 +92,6 @@ library: ...@@ -92,7 +92,6 @@ library:
- Gargantext.Core.Text.Corpus.Parsers - Gargantext.Core.Text.Corpus.Parsers
- Gargantext.Core.Text.Corpus.Parsers.CSV - Gargantext.Core.Text.Corpus.Parsers.CSV
- Gargantext.Core.Text.Corpus.Parsers.Date.Parsec - Gargantext.Core.Text.Corpus.Parsers.Date.Parsec
- Gargantext.Core.Text.Corpus.Parsers
- Gargantext.Core.Text.List.Formats.CSV - Gargantext.Core.Text.List.Formats.CSV
- Gargantext.Core.Text.Metrics - Gargantext.Core.Text.Metrics
- Gargantext.Core.Text.Metrics.CharByChar - Gargantext.Core.Text.Metrics.CharByChar
......
...@@ -19,6 +19,7 @@ import Gargantext.Core.Utils.Prefix (unPrefix) ...@@ -19,6 +19,7 @@ import Gargantext.Core.Utils.Prefix (unPrefix)
import Gargantext.Database.Action.Flow (DataOrigin(..)) import Gargantext.Database.Action.Flow (DataOrigin(..))
data Database = Empty data Database = Empty
| OpenAlex
| PubMed | PubMed
| Arxiv | Arxiv
| HAL | HAL
...@@ -34,12 +35,13 @@ instance ToSchema Database where ...@@ -34,12 +35,13 @@ instance ToSchema Database where
declareNamedSchema = genericDeclareNamedSchemaUnrestricted defaultSchemaOptions declareNamedSchema = genericDeclareNamedSchemaUnrestricted defaultSchemaOptions
database2origin :: Database -> DataOrigin database2origin :: Database -> DataOrigin
database2origin Empty = InternalOrigin Types.IsTex database2origin Empty = InternalOrigin Types.IsTex
database2origin PubMed = ExternalOrigin Types.PubMed database2origin OpenAlex = ExternalOrigin Types.OpenAlex
database2origin Arxiv = ExternalOrigin Types.Arxiv database2origin PubMed = ExternalOrigin Types.PubMed
database2origin HAL = ExternalOrigin Types.HAL database2origin Arxiv = ExternalOrigin Types.Arxiv
database2origin IsTex = ExternalOrigin Types.IsTex database2origin HAL = ExternalOrigin Types.HAL
database2origin Isidore = ExternalOrigin Types.Isidore database2origin IsTex = ExternalOrigin Types.IsTex
database2origin Isidore = ExternalOrigin Types.Isidore
------------------------------------------------------------------------ ------------------------------------------------------------------------
data Datafield = Gargantext data Datafield = Gargantext
......
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