diff --git a/aeson-qq.cabal b/aeson-qq.cabal
--- a/aeson-qq.cabal
+++ b/aeson-qq.cabal
@@ -1,5 +1,5 @@
 name:             aeson-qq
-version:          0.8.0
+version:          0.8.1
 synopsis:         JSON quasiquoter for Haskell
 description:      @aeson-qq@ provides a JSON quasiquoter for Haskell.
                   .
@@ -36,6 +36,7 @@
       Data.JSON.QQ
   build-depends:
       base >= 4.5 && < 5
+    , base-compat
     , text
     , attoparsec
     , scientific
@@ -59,6 +60,7 @@
       Data.Aeson.QQSpec
   build-depends:
       base >= 4.5 && < 5
+    , base-compat
     , text
     , attoparsec
     , scientific
diff --git a/src/Data/Aeson/QQ.hs b/src/Data/Aeson/QQ.hs
--- a/src/Data/Aeson/QQ.hs
+++ b/src/Data/Aeson/QQ.hs
@@ -3,10 +3,12 @@
 -- documentation.
 module Data.Aeson.QQ (aesonQQ) where
 
+import Prelude ()
+import Prelude.Compat
+
 import Language.Haskell.TH
 import Language.Haskell.TH.Quote
 
-import Control.Applicative
 import qualified Data.Vector as V
 import qualified Data.Text as T
 import Data.Aeson
diff --git a/src/Data/JSON/QQ.hs b/src/Data/JSON/QQ.hs
--- a/src/Data/JSON/QQ.hs
+++ b/src/Data/JSON/QQ.hs
@@ -80,7 +80,7 @@
 
 jpObject :: JsonParser
 jpObject = do
-  list <- between (char '{') (char '}') (commaSep jpHash)
+  list <- between (char '{') (char '}') (spaces *> commaSep jpHash)
   return $ JsonObject $ list
   where
     jpHash :: CharParser () (HashKey,JsonValue) -- (String,JsonValue)
@@ -104,7 +104,7 @@
 varKey = HashVarKey <$> (char '$' *> symbol)
 
 jpArray :: CharParser () JsonValue
-jpArray = JsonArray <$> between (char '[') (char ']') (commaSep jpValue)
+jpArray = JsonArray <$> between (char '[') (char ']') (spaces *> commaSep jpValue)
 
 -------
 -- helpers for parser/grammar