GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-25 20:42:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

server: changes lang field to name

Browse Source
This commit is contained in:
bjorn
2008-09-12 11:32:30 +00:00
parent 9cebc28e8e
commit ddd4d418c0
2 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/server/MainFastCGI.hs
View File

@@ -102,9 +102,9 @@ doLinearize pgf tree mto = showJSON $ map toJSObject
doLanguages :: PGF -> JSValue
doLanguages pgf = showJSON $ map toJSObject
[[("lang", showJSON l),
("languageCode", showJSON $ fromMaybe "" (PGF.languageCode pgf l)),
("canParse", showJSON $ PGF.canParse pgf l)]
[[("name", showJSON l),
("languageCode", showJSON $ fromMaybe "" (PGF.languageCode pgf l)),
("canParse", showJSON $ PGF.canParse pgf l)]
| l <- PGF.languages pgf]
doCategories :: PGF -> JSValue