Commit 3706928e authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] Graph filter.

parent 6c152aab
......@@ -75,7 +75,7 @@ getGraph nId = do
<$> groupNodesByNgrams ngs
<$> getNodesByNgramsOnlyUser cId (lIds <> [lId]) NgramsTerms (Map.keys ngs)
graph <- liftIO $ cooc2graph 3 myCooc
graph <- liftIO $ cooc2graph 1 myCooc
pure $ set graph_metadata (Just metadata) graph
......
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