Remove unused Applicative import

<$> is exported by Prelude!!

src/Application.hs

@@ -10,7 +10,6 @@ import Web.Simple
 import Web.Simple.Static       (serveStatic)
 import Web.Simple.Templates    (render)
 
-import Control.Applicative
 import Control.Monad.IO.Class  (liftIO)
 import Text.Printf             (printf)
 import Data.Aeson

src/Breve/Common.hs

@@ -3,7 +3,6 @@ module Breve.Common where
 
 import Paths_breve                     (getDataFileName)
 
-import Control.Applicative
 import Control.Monad.IO.Class          (liftIO)
 import Text.Printf                     (printf)
 import System.Environment              (lookupEnv)

src/Breve/Generator.hs

@@ -5,7 +5,6 @@ module Breve.Generator
 , Url
 ) where
 
-import Control.Applicative
 import Control.Monad.State
 import System.Random
 import Crypto.Hash.SHA256     (hash)

src/Breve/UrlTable.hs

@@ -18,7 +18,7 @@ type UrlTable = H.CuckooHashTable Name Url
 sync :: UrlTable -> FilePath -> IO ()
 sync table file = forever $ do
   threadDelay (round 3.0e8)
-  content <- fmap show (H.toList table)
+  content <- show <$> H.toList table
   writeFile file content
 
 -- Load a url table from a file