Permalink
Browse files

implicitsnap now uses GZip.

  • Loading branch information...
1 parent a124bd3 commit 41f1a76df059c14737f38525307daa22b8f72f99 @colah committed Sep 3, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 implicitsnap.hs
View
@@ -42,7 +42,7 @@ site = route
renderHandler :: Snap ()
renderHandler = method GET $ withCompression $ do
-
+ modifyResponse $ setContentType "application/x-javascript"
request <- getRequest
case (rqParam "source" request, rqParam "callback" request) of
(Just [source], Just [callback]) -> do

0 comments on commit 41f1a76

Please sign in to comment.