From e290d744e4360c0ff8896f96e8e47c59994c32de Mon Sep 17 00:00:00 2001 From: bjorn Date: Fri, 12 Sep 2008 11:32:30 +0000 Subject: server: changes lang field to name --- src/server/MainFastCGI.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/server/MainFastCGI.hs') 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 -- cgit v1.2.3