Merge remote-tracking branch 'origin/dev-hackathon-fixes' into dev
[gargantext.git] / src / Gargantext / Database / Action / Flow / Pairing.hs
index 3e76c363d09d41c729b33546f8923c370e229bf7..b1f15cffd723cd6a7a11257f6c645520682f3ac6 100644 (file)
@@ -190,7 +190,7 @@ getNgramsDocId :: CorpusId
                 -> GargNoServer (HashMap DocAuthor (Set NodeId))
 getNgramsDocId cId lId nt = do
   lIds <- selectNodesWithUsername NodeList userMaster
-  repo <- getRepo' (lId:lIds)
+  repo <- getRepo (lId:lIds)
   let ngs = filterListWithRoot [MapTerm, CandidateTerm] $ mapTermListRoot (lId:lIds) nt repo
   -- printDebug "getNgramsDocId" ngs