From 76b852f510132b186fb8323ad85fce42605b29e3 Mon Sep 17 00:00:00 2001 From: bringert Date: Fri, 5 Jan 2007 15:47:53 +0000 Subject: VoiceXML printer no takes Options and StateGrammar, like SRG printers do. --- src/GF/UseGrammar/Custom.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src/GF/UseGrammar/Custom.hs') 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) -- cgit v1.2.3