Commit d2949cde authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski

Merge branch 'provenance-api-fixes' into 'main'

Make "provenance" optional

See merge request !8
parents a80e0ea5 e8c40841
...@@ -351,14 +351,14 @@ instance Csv.ToNamedRecord Work where ...@@ -351,14 +351,14 @@ instance Csv.ToNamedRecord Work where
data APCList = APCList data APCList = APCList
{ value :: Maybe Int { value :: Maybe Int
, currency :: Text , currency :: Text
, provenance :: Text , provenance :: Maybe Text
, value_usd :: Maybe Int , value_usd :: Maybe Int
} deriving (Generic, Show, FromJSON) } deriving (Generic, Show, FromJSON)
data APCPaid = APCPaid data APCPaid = APCPaid
{ value :: Int { value :: Int
, currency :: Text , currency :: Text
, provenance :: Text , provenance :: Maybe Text
, value_usd :: Maybe Int , value_usd :: Maybe Int
} deriving (Generic, Show, FromJSON) } deriving (Generic, Show, FromJSON)
......
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