diff --git a/src/Main.hs b/src/Main.hs
index cb3aa80..49837ba 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -3,7 +3,7 @@
 -- | Password scatterer.
 module Main (main) where
 
-import Data.ByteString (ByteString, unpack)
+import Data.ByteString (ByteString)
 import qualified Data.ByteString.Char8 as C
 import System.IO
 import System.Exit
diff --git a/src/Scat/Builder.hs b/src/Scat/Builder.hs
index 49caa25..38228b2 100644
--- a/src/Scat/Builder.hs
+++ b/src/Scat/Builder.hs
@@ -33,8 +33,6 @@ 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 4cb129c..c8942d5 100644
--- a/src/Scat/Schemas.hs
+++ b/src/Scat/Schemas.hs
@@ -33,11 +33,10 @@ module Scat.Schemas
     ) where
 
 import Data.Ratio ((%))
+import Data.Monoid ((<>))
 import Data.List (intercalate, (\\))
 import Data.Vector (Vector)
 import qualified Data.Vector as V
-import Data.Monoid
-import Control.Applicative
 import Control.Monad (replicateM)
 import System.IO