This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "snap-core".
The branch, master has been updated
via 52e4c692763d28cc97aea0956e1c8fb4135b4d78 (commit)
from 20c272b8be99a20838d184cfe6f4774b240fdab3 (commit)
Summary of changes:
src/Snap/Util/GZip.hs | 2 ++
1 files changed, 2 insertions(+), 0 deletions(-)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 52e4c692763d28cc97aea0956e1c8fb4135b4d78
Author: Gregory Collins <[email protected]>
Date: Tue Sep 14 21:50:32 2010 -0400
GZip: specify 'Vary: Accept-Encoding'
diff --git a/src/Snap/Util/GZip.hs b/src/Snap/Util/GZip.hs
index f0c6d4b..63a1ee9 100644
--- a/src/Snap/Util/GZip.hs
+++ b/src/Snap/Util/GZip.hs
@@ -141,6 +141,7 @@ gzipCompression :: ByteString -> Snap ()
gzipCompression ce = modifyResponse f
where
f = setHeader "Content-Encoding" ce .
+ setHeader "Vary" "Accept-Encoding" .
clearContentLength .
modifyResponseBody gcompress
@@ -150,6 +151,7 @@ compressCompression :: ByteString -> Snap ()
compressCompression ce = modifyResponse f
where
f = setHeader "Content-Encoding" ce .
+ setHeader "Vary" "Accept-Encoding" .
clearContentLength .
modifyResponseBody ccompress
-----------------------------------------------------------------------
hooks/post-receive
--
snap-core
_______________________________________________
Snap mailing list
[email protected]
http://mailman-mail5.webfaction.com/listinfo/snap
