diff options
Diffstat (limited to 'src/GF/UseGrammar/Custom.hs')
| -rw-r--r-- | src/GF/UseGrammar/Custom.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/GF/UseGrammar/Custom.hs b/src/GF/UseGrammar/Custom.hs index 291b8405d..ca2b704b6 100644 --- a/src/GF/UseGrammar/Custom.hs +++ b/src/GF/UseGrammar/Custom.hs @@ -254,8 +254,7 @@ customGrammarPrinter = ,(strCI "srgs_xml", SRGS.srgsXmlPrinter Nothing False) ,(strCI "srgs_xml_prob", SRGS.srgsXmlPrinter Nothing True) ,(strCI "srgs_xml_sisr_old", SRGS.srgsXmlPrinter (Just SISR.SISROld) False) - ,(strCI "vxml", \opts s -> let start = cfCat2Ident (startCatStateOpts opts s) - in grammar2vxml start s) + ,(strCI "vxml", grammar2vxml) ,(strCI "slf", slfPrinter) ,(strCI "slf_graphviz", slfGraphvizPrinter) ,(strCI "slf_sub", slfSubPrinter) |