[DOC] minor
[gargantext.git] / bin / gargantext-adaptative-phylo / Main.hs
index 5f8bfcff66c1030b246d9f3d7ef83dbd800eab68..c730a46c443188690f20c53052520b7646904dfe 100644 (file)
@@ -29,7 +29,7 @@ import Data.String (String)
 import Data.Text  (Text, unwords, unpack)
 
 import Gargantext.Prelude
-import Gargantext.Database.Types.Node (HyperdataDocument(..))
+import Gargantext.Database.Admin.Types.Node (HyperdataDocument(..))
 import Gargantext.Text.Context (TermList)
 import Gargantext.Text.Corpus.Parsers.CSV (csv_title, csv_abstract, csv_publication_year)
 import Gargantext.Text.Corpus.Parsers (FileFormat(..),parseFile)
@@ -167,10 +167,10 @@ main = do
 
             printIOMsg "End of reconstruction, start the export"
 
-            let dot = toPhyloExport phylo
+            let dot = toPhyloExport phylo        
 
             let output = (outputPath config) 
                       <> (unpack $ phyloName config)
                       <> "_V2.dot"
 
-            dotToFile output dot
\ No newline at end of file
+            dotToFile output dot