diff options
| author | bjorn <bjorn@bringert.net> | 2008-08-15 11:14:13 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-08-15 11:14:13 +0000 |
| commit | 08fae303df1df7ffb2e09a3d9d5cbd378dba281c (patch) | |
| tree | 2d216a88183f30121d7cfc8bb3c77adf88ec1a0c /src/server/MainFastCGI.hs | |
| parent | 0ce04f1a6e0237c3282be737ba2f2069e318100e (diff) | |
First working version of the AJAX translation client.
Diffstat (limited to 'src/server/MainFastCGI.hs')
| -rw-r--r-- | src/server/MainFastCGI.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/server/MainFastCGI.hs b/src/server/MainFastCGI.hs index e275d6e7e..a0ce72f9d 100644 --- a/src/server/MainFastCGI.hs +++ b/src/server/MainFastCGI.hs @@ -42,8 +42,8 @@ cgiMain pgf = mfrom <- getLang pgf "from" mto <- getLang pgf "to" outputJSON $ translate pgf input mcat mfrom mto - "/cats" -> outputJSON $ categories pgf - "/langs" -> outputJSON $ languages pgf + "/categories" -> outputJSON $ categories pgf + "/languages" -> outputJSON $ languages pgf _ -> outputNotFound path getCat :: PGF -> String -> CGI (Maybe Category) |