added Chi to the synopsis languages that can be compiled, but didn't update synopsis yet.

This commit is contained in:
aarne
2012-10-15 09:59:44 +00:00
parent 2eb5438e6f
commit fd48db6b33
3 changed files with 6 additions and 2 deletions

View File

@@ -71,7 +71,7 @@ prApiEx apexx = case M.toList apexx of
[l ++ ": //" ++ mkEx l e ++ "//" | (l,e) <- lexx]
mkEx l = unws . bind . mkE . words where
unws = if elem l ["Jpn","Tha"] then concat else unwords -- remove spaces
unws = if elem l ["Chi","Jpn","Tha"] then concat else unwords -- remove spaces
mkE e = case e of
"atomic":"term":_ -> ["*"]
"[]":_ -> ["''"]