haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix a test

Browse Source
This commit is contained in:
Michael Snoyman 2013-04-03 12:20:40 +03:00
parent 7a90a794d8
commit bbe69d25a2
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
yesod-persistent/test/Yesod/PersistSpec.hs
View File

@ -6,13 +6,12 @@ import Test.Hspec
import Database.Persist.Sqlite
import Network.Wai.Test
import Yesod.Core
import Database.Persist.Store
import Data.Conduit
import Blaze.ByteString.Builder.Char.Utf8 (fromText)
import Yesod.Persist
import Data.Text (Text)
share [mkPersist sqlSettings, mkMigrate "migrateAll"] [persist|
share [mkPersist sqlSettings, mkMigrate "migrateAll"] [persistLowerCase|
Person
name Text
|]
@ -28,7 +27,7 @@ mkYesod "App" [parseRoutes|
instance Yesod App
instance YesodPersist App where
type YesodPersistBackend App = SqlPersist
type YesodPersistBackend App = SqlPersistT
runDB = defaultRunDB appConfig appPool
instance YesodPersistRunner App where
getDBRunner = defaultGetDBRunner appPool