summaryrefslogtreecommitdiff
path: root/src/GF/Compile/Export.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Compile/Export.hs')
-rw-r--r--src/GF/Compile/Export.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Compile/Export.hs b/src/GF/Compile/Export.hs
index 8b924113d..575a9dc84 100644
--- a/src/GF/Compile/Export.hs
+++ b/src/GF/Compile/Export.hs
@@ -51,7 +51,7 @@ exportPGF opts fmt pgf =
FmtRegExp -> single "rexp" regexpPrinter
FmtFA -> single "dot" slfGraphvizPrinter
where
- name = fromMaybe (prCId (absname pgf)) (moduleFlag optName opts)
+ name = fromMaybe (prCId (absname pgf)) (flag optName opts)
multi :: String -> (PGF -> String) -> [(FilePath,String)]
multi ext pr = [(name <.> ext, pr pgf)]