mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-26 21:12:50 -06:00
First working version of the AJAX translation client.
This commit is contained in:
@@ -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)
|
||||
|
||||
Reference in New Issue
Block a user