Remove unused TemplateHaskell pragmas

Fixes yesodweb#427
creichert · Jul 23, 2015 · bc00c06 · bc00c06
1 parent f939467
commit bc00c06
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 4 deletions.
diff --git a/persistent/Database/Persist/Quasi.hs b/persistent/Database/Persist/Quasi.hs
@@ -2,7 +2,6 @@
 {-# LANGUAGE CPP #-}
 {-# LANGUAGE PatternGuards #-}
 {-# LANGUAGE ViewPatterns #-}
-{-# LANGUAGE TemplateHaskell #-}
 module Database.Persist.Quasi
     ( parse
     , PersistSettings (..)

diff --git a/persistent/Database/Persist/Sql/Raw.hs b/persistent/Database/Persist/Sql/Raw.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE TemplateHaskell #-}
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE FlexibleContexts #-}
 module Database.Persist.Sql.Raw where
@@ -9,7 +8,6 @@ import Database.Persist.Sql.Class
 import qualified Data.Map as Map
 import Control.Monad.IO.Class (MonadIO, liftIO)
 import Control.Monad.Reader (ReaderT, ask, MonadReader)
-import Control.Monad.Trans.Resource (release)
 import Data.Acquire (allocateAcquire, Acquire, mkAcquire, with)
 import Data.IORef (writeIORef, readIORef, newIORef)
 import Control.Exception (throwIO)
@@ -19,7 +17,7 @@ import Control.Monad.Logger (logDebugNS, runLoggingT)
 import Data.Int (Int64)
 import qualified Data.Text as T
 import Data.Conduit
-import Control.Monad.Trans.Resource (MonadResource)
+import Control.Monad.Trans.Resource (MonadResource,release)
 
 rawQuery :: (MonadResource m, MonadReader env m, HasPersistBackend env SqlBackend)
          => Text