vd command now reads local concrete configurations to deal with syncat words; TODO: dissolve clustered multiwords bound with +

This commit is contained in:
aarne committed 2017-04-06 11:55:21 +00:00
1 parent 20a038719f
commit ee2f3d085e
4 files changed
+81 -21

No files matched your search

+1 -1
View File
@@ -794,7 +794,7 @@ parseTree pgf lang opts tree = PGF.graphvizParseTree pgf lang opts tree
doDepTree lc path pgf fmt lang tree =
do (_,lbls) <- liftIO $ getLabels lc path pgf
let vis = PGF.graphvizDependencyTree fmt False (Just lbls) () pgf lang tree
let vis = PGF.graphvizDependencyTree fmt False (Just lbls) Nothing pgf lang tree ---- TODO: CncLabels
if fmt `elem` ["png","gif","gv"]
then outputGraphviz vis
else if fmt=="svg"