diff --git a/snap-core.cabal b/snap-core.cabal
--- a/snap-core.cabal
+++ b/snap-core.cabal
@@ -1,5 +1,5 @@
 name:           snap-core
-version:        0.1.1
+version:        0.1.2
 synopsis:       Snap: A Haskell Web Framework (Core)
 
 description:
diff --git a/src/Snap/Util/GZip.hs b/src/Snap/Util/GZip.hs
--- a/src/Snap/Util/GZip.hs
+++ b/src/Snap/Util/GZip.hs
@@ -298,7 +298,9 @@
         float
         return ()
 
-    coding = string "*" <|> takeWhile isAlpha_ascii
+    coding = string "*" <|> takeWhile isCodingChar
+
+    isCodingChar c = isAlpha_ascii c || c == '-'
 
     float = takeWhile isDigit >>
             option () (char '.' >> takeWhile isDigit >> pure ())
diff --git a/test/suite/Snap/Util/GZip/Tests.hs b/test/suite/Snap/Util/GZip/Tests.hs
--- a/test/suite/Snap/Util/GZip/Tests.hs
+++ b/test/suite/Snap/Util/GZip/Tests.hs
@@ -52,7 +52,7 @@
 ------------------------------------------------------------------------------
 gzipHdrs, badHdrs, compressHdrs, emptyHdrs :: Headers
 emptyHdrs = Map.empty
-gzipHdrs = setHeader "Accept-Encoding" "froz,gzip" emptyHdrs
+gzipHdrs = setHeader "Accept-Encoding" "froz,gzip, x-gzip" emptyHdrs
 badHdrs = setHeader "Accept-Encoding" "*&%^&^$%&%&*^\023" emptyHdrs
 compressHdrs = setHeader "Accept-Encoding" "compress" emptyHdrs