diff options
| author | bjorn <bjorn@bringert.net> | 2008-09-12 11:32:30 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-09-12 11:32:30 +0000 |
| commit | e290d744e4360c0ff8896f96e8e47c59994c32de (patch) | |
| tree | ee64bf1ba1e3f753896e7b7d33db79f6437f18c7 /src/server/MainFastCGI.hs | |
| parent | 24d82d5a482ff70b1bb694fb9c707690d736e56a (diff) | |
server: changes lang field to name
Diffstat (limited to 'src/server/MainFastCGI.hs')
| -rw-r--r-- | src/server/MainFastCGI.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/server/MainFastCGI.hs b/src/server/MainFastCGI.hs index 1f2413211..d3c223c92 100644 --- a/src/server/MainFastCGI.hs +++ b/src/server/MainFastCGI.hs @@ -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 |