Skip to content

haskell-gargantext
haskell-gargantext
Commit a3caa26a authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[CLEAN/API] removing unused route

parent 32246950
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 4 deletions
src/Gargantext/API/Routes.hs
View file @ a3caa26a
...@@ -95,12 +95,10 @@ type GargPrivateAPI' = ...@@ -95,12 +95,10 @@ type GargPrivateAPI' =
:> Capture "node_id" NodeId :> Capture "node_id" NodeId
:> NodeAPI HyperdataAny :> NodeAPI HyperdataAny
--{-
-- Corpus endpoints -- Corpus endpoints
:<|> "corpus" :> Summary "Corpus endpoint" :<|> "corpus" :> Summary "Corpus endpoint"
:> Capture "corpus_id" CorpusId :> Capture "corpus_id" CorpusId
:> NodeAPI HyperdataCorpus :> NodeAPI HyperdataCorpus
--}
:<|> "corpus" :> Summary "Corpus endpoint" :<|> "corpus" :> Summary "Corpus endpoint"
:> Capture "node1_id" NodeId :> Capture "node1_id" NodeId
...@@ -154,7 +152,7 @@ type GargPrivateAPI' = ...@@ -154,7 +152,7 @@ type GargPrivateAPI' =
-- :<|> New.Upload -- :<|> New.Upload
:<|> New.AddWithForm :<|> New.AddWithForm
:<|> New.AddWithFile -- :<|> New.AddWithFile
:<|> New.AddWithQuery :<|> New.AddWithQuery
-- :<|> "annuaire" :> Annuaire.AddWithForm -- :<|> "annuaire" :> Annuaire.AddWithForm
...@@ -233,7 +231,7 @@ serverPrivateGargAPI' (AuthenticatedUser (NodeId uid)) ...@@ -233,7 +231,7 @@ serverPrivateGargAPI' (AuthenticatedUser (NodeId uid))
<$> PathNode <*> treeAPI <$> PathNode <*> treeAPI
-- TODO access -- TODO access
:<|> addCorpusWithForm (RootId (NodeId uid)) :<|> addCorpusWithForm (RootId (NodeId uid))
:<|> addCorpusWithFile (RootId (NodeId uid)) -- :<|> addCorpusWithFile (RootId (NodeId uid))
:<|> addCorpusWithQuery (RootId (NodeId uid)) :<|> addCorpusWithQuery (RootId (NodeId uid))
-- :<|> addAnnuaireWithForm -- :<|> addAnnuaireWithForm
......
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