[FIX] MapList default terms -> Candidate + Cosmetics import.

src/Gargantext/Database/Flow.hs

@@ -308,7 +308,7 @@ insertGroups lId ngrs =
 ngrams2list :: Map NgramsIndexed (Map NgramsType a)
             -> [(ListType, (NgramsType,NgramsIndexed))]
 ngrams2list m =
-  [ (GraphList, (t, ng))
+  [ (CandidateList, (t, ng))
   | (ng, tm) <- DM.toList m
   , t <- DM.keys tm
   ]

src/Gargantext/Database/Schema/Ngrams.hs

@@ -350,9 +350,9 @@ querySelectTableNgrams = [sql|
 querySelectTableNgramsTrees :: PGS.Query
 querySelectTableNgramsTrees = [sql|
 
-DROP FUNCTION tree_start(integer,integer,integer,integer,integer,integer,integer,integer);
-DROP FUNCTION tree_end(integer,integer,integer,integer,integer,integer);
-DROP FUNCTION tree_ngrams(integer,integer,integer,integer,integer,integer,integer,integer);
+-- DROP FUNCTION tree_start(integer,integer,integer,integer,integer,integer,integer,integer);
+-- DROP FUNCTION tree_end(integer,integer,integer,integer,integer,integer);
+-- DROP FUNCTION tree_ngrams(integer,integer,integer,integer,integer,integer,integer,integer);
 
 CREATE OR REPLACE FUNCTION public.tree_start(luid INT, lmid INT,cuid INT, cmid INT, tdoc INT, tngrams INT, lmt INT, ofst INT)
  RETURNS TABLE (id INT, parent_id INT, terms VARCHAR(255), n int, list_type int, weight float8) AS $$

src/Gargantext/Text/Parsers/Isidore.hs

@@ -30,7 +30,7 @@ import Database.HSparql.QueryGenerator
 import Gargantext.Database.Types.Node (HyperdataDocument(..))
 import Gargantext.Prelude
 import Gargantext.Core (Lang)
-import Network.Wreq
+import Network.Wreq (getWith, Response, defaults, header, param, responseStatus, responseBody)
 import Prelude (String)
 
 route :: EndPoint