diff options
| author | aarne <aarne@chalmers.se> | 2017-04-06 11:55:21 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2017-04-06 11:55:21 +0000 |
| commit | ee2f3d085ea1e3ca943f78e71be518fd2f0b16cc (patch) | |
| tree | 20d6c7ef99c660901db5c0ad1b36ba77a1defc09 /src/server/PGFService.hs | |
| parent | 20a038719f4813d513087b214946d5b84a25a72c (diff) | |
vd command now reads local concrete configurations to deal with syncat words; TODO: dissolve clustered multiwords bound with +
Diffstat (limited to 'src/server/PGFService.hs')
| -rw-r--r-- | src/server/PGFService.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/server/PGFService.hs b/src/server/PGFService.hs index d84f2b3c2..f12ad75fb 100644 --- a/src/server/PGFService.hs +++ b/src/server/PGFService.hs @@ -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" |