diff --git a/Changelog.md b/Changelog.md
--- a/Changelog.md
+++ b/Changelog.md
@@ -1,3 +1,8 @@
+# 1.2.7
+
+* Now compiles with GHC 7.10. Thanks to Philip Joseph (@lambdahands) for fixing
+  this.
+
 # 1.2.6
 
 * Increased upper bounds on `network`, `text` and `transformers`.
diff --git a/snap-cors.cabal b/snap-cors.cabal
--- a/snap-cors.cabal
+++ b/snap-cors.cabal
@@ -1,5 +1,5 @@
 name:                snap-cors
-version:             1.2.6
+version:             1.2.7
 synopsis:            Add CORS headers to Snap applications
 description:
   Add CORS (cross-origin resource sharing) headers to Snap applications. This
diff --git a/src/Snap/CORS.hs b/src/Snap/CORS.hs
--- a/src/Snap/CORS.hs
+++ b/src/Snap/CORS.hs
@@ -205,7 +205,7 @@
 
   splitHeaders =
     let spaces = Attoparsec.many' Attoparsec.space
-        headerC = Attoparsec.satisfy (not . (`elem` " ,"))
+        headerC = Attoparsec.satisfy (not . (`elem`( " ," :: String)))
         headerName = Attoparsec.many' headerC
         header = spaces *> headerName <* spaces
         parser = HashSet.fromList <$> header `Attoparsec.sepBy` (Attoparsec.char ',')