diff options
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) |