Skip to content

haskell-gargantext
haskell-gargantext
Verified Commit 685ad41a authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski
Browse files
Options

[phylo] remove file copying that I had for debugging purposes

parent 1606c306
Pipeline #7841 failed with stages
          in 16 minutes and 38 seconds
          Hide whitespace changes
          Inline Side-by-side
          Showing with 0 additions and 4 deletions
          src/Gargantext/Core/Viz/Phylo/API/Tools.hs
          View file @ 685ad41a
          ...@@ -91,10 +91,6 @@ phylo2dot2json phylo = do ...@@ -91,10 +91,6 @@ phylo2dot2json phylo = do
          Shell.callProcess "dot" ["-Tdot", "-o", fileDot, fileFrom] Shell.callProcess "dot" ["-Tdot", "-o", fileDot, fileFrom]
          Shell.callProcess "dot" ["-Txdot_json", "-o", fileToJson, fileDot] Shell.callProcess "dot" ["-Txdot_json", "-o", fileToJson, fileDot]
          copyFile fileToJson "/home/przemek/phylo/output.json"
          copyFile fileDot "/home/przemek/phylo/phylo.dot"
          copyFile fileFrom "/home/przemek/phylo/phyloFrom.dot"
          maybeValue <- decodeFileStrict fileToJson maybeValue <- decodeFileStrict fileToJson
          -- print maybeValue -- print maybeValue
          ......
          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