From d760149ce005be5c87dae511257430b61c544f59 Mon Sep 17 00:00:00 2001
From: Alp Mestanogullari <alpmestan@gmail.com>
Date: Mon, 8 Dec 2014 13:34:26 +0100
Subject: [PATCH] put quotes around header name

---
 src/Servant/JQuery.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Servant/JQuery.hs b/src/Servant/JQuery.hs
index df6f0ddf..1bf25f63 100644
--- a/src/Servant/JQuery.hs
+++ b/src/Servant/JQuery.hs
@@ -70,7 +70,7 @@ generateJS req = "\n" <>
             else "\n    , headers: { " ++ headersStr hs ++ " } }\n"
 
           where headersStr hs = intercalate ", " $ map headerStr hs
-                headerStr hname = hname ++ ": header" ++ hname
+                headerStr hname = "\"" ++ hname ++ "\": header" ++ hname
 
         fname = req ^. funcName
         method = req ^. reqMethod