msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

SRGS XML: the meta tag should use empty tag short-hand.

Browse Source
This commit is contained in:
bringert
2007-06-26 15:20:32 +00:00
parent 84e030d128
commit ee39e2c742
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Speech/PrSRGS.hs
View File

@@ -139,7 +139,7 @@ grammar sisr root ml =
++ maybe [] (\l -> [("xml:lang", l)]) ml ++ maybe [] (\l -> [("xml:lang", l)]) ml
meta :: String -> String -> XML 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 :: XML -> XML
optimizeSRGS = bottomUpXML f optimizeSRGS = bottomUpXML f