Web.Apiary.Database.Persist

Documentation

data Persist

initializer

data Migrator

Constructors

Logging Migration

Silent Migration

Unsafe Migration

NoMigrate

type With c m = forall a. (c -> m a) -> m a

initPersist :: (MonadIO m, MonadBaseControl IO m) => With SqlBackend (LogWrapper exts m) -> Migration -> Initializer m exts (Persist : exts)

construct persist extension initializer with no connection pool.

example:

initPersist (withSqliteConn "db.sqlite") migrateAll

initPersistNoLog :: (MonadIO m, MonadBaseControl IO m) => With SqlBackend (NoLoggingT m) -> Migration -> Initializer m es (Persist : es)

initPersistPool :: (MonadIO m, MonadBaseControl IO m) => With ConnectionPool (LogWrapper exts m) -> Migration -> Initializer m exts (Persist : exts)

initPersistPoolNoLog :: (MonadIO m, MonadBaseControl IO m) => With ConnectionPool (NoLoggingT m) -> Migration -> Initializer m es (Persist : es)

low level

initPersist' :: (MonadIO n, MonadBaseControl IO n, Monad m) => (forall a. m a -> n a) -> (forall a. Extensions exts -> n a -> m a) -> With SqlBackend n -> Migrator -> Initializer m exts (Persist : exts)

initPersistPool' :: (MonadIO n, MonadBaseControl IO n, Monad m) => (forall a. m a -> n a) -> (forall a. Extensions exts -> n a -> m a) -> With ConnectionPool n -> Migrator -> Initializer m exts (Persist : exts)

query

runSql :: (Has Persist exts, MonadBaseControl IO m) => SqlPersistT (ActionT exts prms m) a -> ActionT exts prms m a

execute sql in action.

filter

sql

Arguments

:: (Has Persist exts, MonadBaseControl IO actM, NotMember k prms)

=> Maybe Html

documentation.

-> proxy k

-> SqlPersistT (ActionT exts prms actM) a

-> (a -> Maybe b)

result check function. Nothing: fail filter, Just a: success filter and add parameter.

-> ApiaryT exts ((k := b) : prms) actM m ()

-> ApiaryT exts prms actM m ()

filter by sql query. since 0.9.0.0.