Remove a few unused imports
This commit is contained in:
parent
a61b031d99
commit
abb72dce61
|
@ -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
|
||||
|
|
|
@ -1,8 +1,5 @@
|
|||
module Main where
|
||||
|
||||
import Network.Wai
|
||||
import Network.Wai.Handler.Warp
|
||||
|
||||
import API
|
||||
|
||||
main :: IO ()
|
||||
|
|
|
@ -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
|
||||
|
||||
|
|
Loading…
Reference in New Issue