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

Add 205

Browse source
This commit is contained in:
Arian van Putten 2015-12-27 17:23:46 +01:00
parent a15d1d9314
commit 82fa23507f
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
servant-js/src/Servant/JS/Vanilla.hs
View file

@ -37,7 +37,7 @@ generateVanillaJSWith opts req = "\n" <>
<> (if isJust (req ^. reqBody) then " xhr.setRequestHeader(\"Content-Type\",\"application/json\");\n" else "") <> (if isJust (req ^. reqBody) then " xhr.setRequestHeader(\"Content-Type\",\"application/json\");\n" else "")
<> " xhr.onreadystatechange = function (e) {\n" <> " xhr.onreadystatechange = function (e) {\n"
<> " if (xhr.readyState == 4) {\n" <> " if (xhr.readyState == 4) {\n"
<> " if (xhr.status == 204) {\n" <> " if (xhr.status == 204 || xhr.status == 205) {\n"
<> " onSuccess();\n" <> " onSuccess();\n"
<> " } else if (xhr.status >= 200 && xhr.status < 300) {\n" <> " } else if (xhr.status >= 200 && xhr.status < 300) {\n"
<> " var value = JSON.parse(xhr.responseText);\n" <> " var value = JSON.parse(xhr.responseText);\n"