Do not enforce GQL policies for all routes

src/Gargantext/API/GraphQL/Node.hs

@@ -56,7 +56,9 @@ resolveNodes
   -> NodeArgs
   -> GqlM e env [Node]
 resolveNodes autUser mgr NodeArgs { node_id } =
-  withPolicy autUser mgr (nodeChecks (NodeId node_id)) $ dbNodes node_id
+  -- FIXME(adn) We should have a way to enforce the access policy on
+  -- the public or public folders, instead of using 'alwaysAllow'.
+  withPolicy autUser mgr alwaysAllow $ dbNodes node_id
 
 resolveNodesCorpus
   :: (CmdCommon env)

src/Gargantext/API/GraphQL/TreeFirstLevel.hs

@@ -60,7 +60,9 @@ resolveTree :: (CmdCommon env)
             -> TreeArgs
             -> GqlM e env (TreeFirstLevel (GqlM e env))
 resolveTree autUser mgr TreeArgs { root_id } =
-  withPolicy autUser mgr (nodeChecks (NodeId root_id)) $ dbTree root_id
+  -- FIXME(adn) We should have a way to enforce the access policy on
+  -- the public or public folders, instead of using 'alwaysAllow'.
+  withPolicy autUser mgr alwaysAllow $ dbTree root_id
 
 dbTree :: (CmdCommon env) =>
           Int -> GqlM e env (TreeFirstLevel (GqlM e env))