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 9c50804c6f
commit f6196aea4d
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 =
if req ^. reqBody
then "\n , data: JSON.stringify(body)\n"
then " , data: JSON.stringify(body)\n" <>
" , contentType: 'application/json'\n"
else ""
reqheaders =
if null hs
then ""
else "\n , headers: { " ++ headersStr ++ " }\n"
else " , headers: { " ++ headersStr ++ " }\n"
where headersStr = intercalate ", " $ map headerStr hs
headerStr header = "\"" ++