Skip to content

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

[CLEAN] Commenting debug funs

parent 9a5c6eee
Show whitespace changes
Inline Side-by-side
Showing with 2 additions and 8 deletions
src/Gargantext/Core/Viz/Graph/API.hs
View file @ f20aa4b0
...@@ -165,10 +165,10 @@ computeGraph cId d nt repo = do ...@@ -165,10 +165,10 @@ computeGraph cId d nt repo = do
<$> getNodesByNgramsOnlyUser cId (lIds <> [lId]) nt (HashMap.keys ngs) <$> getNodesByNgramsOnlyUser cId (lIds <> [lId]) nt (HashMap.keys ngs)
-- printDebug "myCooc" myCooc -- printDebug "myCooc" myCooc
saveAsFileDebug "debug/my-cooc" myCooc -- saveAsFileDebug "debug/my-cooc" myCooc
graph <- liftBase $ cooc2graphWith Spinglass d 0 myCooc graph <- liftBase $ cooc2graphWith Spinglass d 0 myCooc
saveAsFileDebug "debug/graph" graph -- saveAsFileDebug "debug/graph" graph
pure graph pure graph
......
src/Gargantext/Database/Action/Flow.hs
View file @ f20aa4b0
...@@ -479,9 +479,3 @@ extractInsert docs = do ...@@ -479,9 +479,3 @@ extractInsert docs = do
pure () pure ()
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