Commit b86280ec authored by Alexandre Delanoë's avatar Alexandre Delanoë

[DEBUG] Message

parent 1a498118
......@@ -114,7 +114,7 @@ documentsFromWriteNodes uId nId Params { selection, lang, paragraphs } logStatus
let parsedE = (\(node, contents)
-> hyperdataDocumentFromFrameWrite lang (fromMaybe 7 paragraphs') (node, contents)) <$> frameWritesWithContents
let parsed = List.concat $ rights parsedE
printDebug "DocumentsFromWriteNodes: uId" uId
_ <- flowDataText (RootId (NodeId uId))
(DataNew (Just $ fromIntegral $ length parsed, yieldMany parsed))
(Multi lang)
......
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