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

[FIX] strict.

parent 2034f5c6
...@@ -99,7 +99,7 @@ instance FromJSON ScraperInput where ...@@ -99,7 +99,7 @@ instance FromJSON ScraperInput where
data ScraperInput2 = ScraperInput2 data ScraperInput2 = ScraperInput2
{ _scin2_query :: !Text { _scin2_query :: !Text
, _scin2_corpus :: !Int , _scin2_corpus :: !Int
, _scin2_databases :: [ExternalAPIs] , _scin2_databases :: ![ExternalAPIs]
} }
deriving Generic deriving Generic
......
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