From 475d53565195233d3928847c98cef69fc19c56c4 Mon Sep 17 00:00:00 2001 From: bringert Date: Thu, 28 Dec 2006 17:12:40 +0000 Subject: Use printname to make VoiceXML prompts. --- src/GF/UseGrammar/Custom.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/GF/UseGrammar') diff --git a/src/GF/UseGrammar/Custom.hs b/src/GF/UseGrammar/Custom.hs index 9a689cb8c..4fdc04982 100644 --- a/src/GF/UseGrammar/Custom.hs +++ b/src/GF/UseGrammar/Custom.hs @@ -270,7 +270,7 @@ customGrammarPrinter = \opts s -> let name = cncId s start = getStartCatCF opts s in SRGS.srgsXmlPrinter name start opts (Just SISR.SISROld) Nothing $ stateCFG s) - ,(strCI "vxml", \opts s -> let start = getStartCat opts s + ,(strCI "vxml", \opts s -> let start = cfCat2Ident (startCatStateOpts opts s) in grammar2vxml start s) ,(strCI "slf", \opts s -> let start = getStartCatCF opts s name = cncId s -- cgit v1.2.3