persistent.hs:49:5:
No instance for (Control.Monad.Logger.MonadLogger IO)
arising from a use of `runMigration'
Possible fix:
add an instance declaration for
(Control.Monad.Logger.MonadLogger IO)
In a stmt of a 'do' block: runMigration migrateAll
In the second argument of `($)', namely
`do { runMigration migrateAll;
johnId <- insert $ Person "John Doe" $ Just 32;
john <- get johnId;
liftIO $ print (john :: Maybe Person);
.... }'
In a stmt of a 'do' block:
runDB pool
$ do { runMigration migrateAll;
johnId <- insert $ Person "John Doe" $ Just 32;
john <- get johnId;
liftIO $ print (john :: Maybe Person);
.... }
persistent.hs:50:15:
No instance for (MonadResource IO) arising from a use of `insert'
Possible fix: add an instance declaration for (MonadResource IO)
In the expression: insert
In a stmt of a 'do' block:
johnId <- insert $ Person "John Doe" $ Just 32
In the second argument of `($)', namely
`do { runMigration migrateAll;
johnId <- insert $ Person "John Doe" $ Just 32;
john <- get johnId;
liftIO $ print (john :: Maybe Person);
.... }'