diff --git a/src/Scat/Builder.hs b/src/Scat/Builder.hs
index 38228b2..49caa25 100644
--- a/src/Scat/Builder.hs
+++ b/src/Scat/Builder.hs
@@ -33,6 +33,8 @@ module Scat.Builder
     ) where
 
 import Data.Char (ord, chr)
+import Data.Monoid
+import Control.Applicative
 import Control.Monad
 import Control.Arrow (second)
 import Data.Vector (Vector)
diff --git a/src/Scat/Schemas.hs b/src/Scat/Schemas.hs
index c8942d5..d5e2865 100644
--- a/src/Scat/Schemas.hs
+++ b/src/Scat/Schemas.hs
@@ -32,6 +32,7 @@ module Scat.Schemas
     , androidPatternLock
     ) where
 
+import Data.Functor ((<$>))
 import Data.Ratio ((%))
 import Data.Monoid ((<>))
 import Data.List (intercalate, (\\))