diff options
| author | bringert <bringert@cs.chalmers.se> | 2006-04-19 09:03:19 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2006-04-19 09:03:19 +0000 |
| commit | ccd51897664df4547f9649d1c7f1ffb92a35b43d (patch) | |
| tree | 9909856d4bb16700894733d4eafd6361e2c34bda /src/GF/UseGrammar/Custom.hs | |
| parent | 43b962f525448492bf7843541ebc1b2c818172e8 (diff) | |
Use quest_Cat to generate questions in the VoiceXML printer.
Diffstat (limited to 'src/GF/UseGrammar/Custom.hs')
| -rw-r--r-- | src/GF/UseGrammar/Custom.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/UseGrammar/Custom.hs b/src/GF/UseGrammar/Custom.hs index 82aade7ff..f6799811b 100644 --- a/src/GF/UseGrammar/Custom.hs +++ b/src/GF/UseGrammar/Custom.hs @@ -262,7 +262,7 @@ customGrammarPrinter = start = getStartCatCF opts s in srgsXmlPrinter name start opts True Nothing $ stateCFG s) ,(strCI "vxml", \opts s -> let start = getStartCat opts s - in grammar2vxml start (stateGrammarST s)) + in grammar2vxml start s) ,(strCI "slf", \opts s -> let start = getStartCatCF opts s name = cncId s in slfPrinter name start $ stateCFG s) |