From 99ac3f8d731e6bacdf24564cc29887faf100f4ac Mon Sep 17 00:00:00 2001 From: bringert Date: Tue, 26 Jun 2007 15:20:32 +0000 Subject: [PATCH] SRGS XML: the meta tag should use empty tag short-hand. --- src/GF/Speech/PrSRGS.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/GF/Speech/PrSRGS.hs b/src/GF/Speech/PrSRGS.hs index 3b88cad3a..d8ae07867 100644 --- a/src/GF/Speech/PrSRGS.hs +++ b/src/GF/Speech/PrSRGS.hs @@ -139,7 +139,7 @@ grammar sisr root ml = ++ maybe [] (\l -> [("xml:lang", l)]) ml meta :: String -> String -> XML -meta n c = Tag "meta" [("name",n),("content",c)] [] +meta n c = ETag "meta" [("name",n),("content",c)] optimizeSRGS :: XML -> XML optimizeSRGS = bottomUpXML f