eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

servant-jquery: set content type to application/json on POST

Browse source 
Also remove some redundant newlines in generated JS.
This commit is contained in:
bwo 2015-07-07 21:25:32 -07:00 committed by Christian Marie
parent 1efe9f1a2a
commit 3b4df6775b
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
servant-jquery/src/Servant/JQuery.hs
View file

@ -65,13 +65,14 @@ generateJS req = "\n" <>
dataBody = dataBody =
if req ^. reqBody if req ^. reqBody
then "\n , data: JSON.stringify(body)\n" then " , data: JSON.stringify(body)\n" <>
" , contentType: 'application/json'\n"
else "" else ""
reqheaders = reqheaders =
if null hs if null hs
then "" then ""
else "\n , headers: { " ++ headersStr ++ " }\n" else " , headers: { " ++ headersStr ++ " }\n"
where headersStr = intercalate ", " $ map headerStr hs where headersStr = intercalate ", " $ map headerStr hs
headerStr header = "\"" ++ headerStr header = "\"" ++