put quotes around header name
commitd760149ce005be5c87dae511257430b61c544f59
authorAlp Mestanogullari <alpmestan@gmail.com>
dateMon 8 Dec 2014, 13:34 (12 years ago)
parent3d467cf
src/Servant/JQuery.hs+1−1
@@ -70,7 +70,7 @@ generateJS req = "\n" <>
7070 else "\n , headers: { " ++ headersStr hs ++ " } }\n"
7171
7272 where headersStr hs = intercalate ", " $ map headerStr hs
73− headerStr hname = hname ++ ": header" ++ hname
73+ headerStr hname = "\"" ++ hname ++ "\": header" ++ hname
7474
7575 fname = req ^. funcName
7676 method = req ^. reqMethod