Remove a few unused imports

This commit is contained in:
osmarks 2017-09-24 12:28:34 +01:00
parent a61b031d99
commit abb72dce61
3 changed files with 1 additions and 5 deletions

View File

@ -7,7 +7,6 @@ module Config where
import Control.Monad.Reader
import Control.Monad.Except
import Database.Persist
import Database.Persist.Sql
import Servant
@ -22,6 +21,7 @@ newtype App a = App
appToServer :: HandlerConfig -> App :~> Handler
appToServer cfg = NT (flip runReaderT cfg . runApp)
-- Runs a database action in the App monad
runDB :: (MonadReader HandlerConfig m, MonadIO m) => SqlPersistT IO b -> m b
runDB query = do
db <- asks db

View File

@ -1,8 +1,5 @@
module Main where
import Network.Wai
import Network.Wai.Handler.Warp
import API
main :: IO ()

View File

@ -17,7 +17,6 @@ import GHC.Generics
import Database.Persist
import Database.Persist.Sql
import Database.Persist.TH
import qualified Data.Text as T
import Data.Text (Text(..))
import Data.Aeson