Commit 2976d677 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FLOW] order of mkNode.

parent 1e43f1aa
Pipeline #536 canceled with stage
......@@ -186,6 +186,7 @@ flowCorpusUser l userName corpusName ctype ids = do
(userId, _rootId, userCorpusId) <- getOrMkRootWithCorpus userName corpusName ctype
-- TODO: check if present already, ignore
_ <- Doc.add userCorpusId ids
_ <- mkTexts userCorpusId userId
-- User List Flow
--{-
......@@ -194,7 +195,6 @@ flowCorpusUser l userName corpusName ctype ids = do
userListId <- flowList userId userCorpusId ngs
printDebug "userListId" userListId
-- User Graph Flow
_ <- mkTexts userCorpusId userId
_ <- mkDashboard userCorpusId userId
_ <- mkGraph userCorpusId userId
_ <- mkPhylo userCorpusId userId
......
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