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

[FIX] swagger again.

parent 82e49daf
...@@ -166,7 +166,7 @@ type GargAPI = "user" :> Summary "First user endpoint" ...@@ -166,7 +166,7 @@ type GargAPI = "user" :> Summary "First user endpoint"
:<|> "count" :> Summary "Count endpoint" :<|> "count" :> Summary "Count endpoint"
:> ReqBody '[JSON] Query :> CountAPI :> ReqBody '[JSON] Query :> CountAPI
:<|> "scraper" :> WithCallbacks ScraperAPI -- :<|> "scraper" :> WithCallbacks ScraperAPI
-- /mv/<id>/<id> -- /mv/<id>/<id>
-- /merge/<id>/<id> -- /merge/<id>/<id>
...@@ -184,14 +184,14 @@ type API = SwaggerFrontAPI :<|> GargAPI ...@@ -184,14 +184,14 @@ type API = SwaggerFrontAPI :<|> GargAPI
-- | Server declaration -- | Server declaration
server :: Env -> IO (Server API) server :: Env -> IO (Server API)
server env = do server env = do
orchestrator <- scrapyOrchestrator env -- orchestrator <- scrapyOrchestrator env
pure $ swaggerFront pure $ swaggerFront
:<|> roots conn :<|> roots conn
:<|> nodeAPI conn :<|> nodeAPI conn
:<|> nodeAPI conn :<|> nodeAPI conn
:<|> nodesAPI conn :<|> nodesAPI conn
:<|> count :<|> count
:<|> orchestrator -- :<|> orchestrator
where where
conn = env ^. env_conn conn = env ^. env_conn
......
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