WikiMusic.Free.GenreCommand

Documentation

data GenreCommand a

Constructors

InsertGenres Env [Genre] (Map UUID Genre -> a)

InsertGenreComments Env [GenreComment] (Map UUID GenreComment -> a)

InsertGenreArtworks Env [GenreArtwork] (Map UUID GenreArtwork -> a)

UpsertGenreOpinions Env [GenreOpinion] (Map UUID GenreOpinion -> a)

InsertGenreExternalSources Env [GenreExternalSources] (Map UUID GenreExternalSources -> a)

DeleteGenres Env [UUID] (Either GenreCommandError () -> a)

DeleteGenreComments Env [UUID] (Either GenreCommandError () -> a)

DeleteGenreArtworks Env [UUID] (Either GenreCommandError () -> a)

DeleteGenreOpinions Env [UUID] (Either GenreCommandError () -> a)

DeleteCommentsOfGenres Env [UUID] (Either GenreCommandError () -> a)

DeleteGenreExternalSources Env [UUID] (Either GenreCommandError () -> a)

DeleteArtworksOfGenres Env [UUID] (Either GenreCommandError () -> a)

DeleteOpinionsOfGenres Env [UUID] (Either GenreCommandError () -> a)

UpdateGenreArtworkOrder Env [GenreArtworkOrderUpdate] (Either Text () -> a)

UpdateGenres Env (Map UUID (Genre, Maybe GenreDelta)) (Either Text () -> a)

UpdateGenreExternalSources Env (Map UUID (Genre, Maybe GenreDelta)) (Either Text () -> a)

NewGenreFromRequest UUID InsertGenresRequestItem (Genre -> a)

NewGenreCommentFromRequest UUID InsertGenreCommentsRequestItem (GenreComment -> a)

NewGenreOpinionFromRequest UUID UpsertGenreOpinionsRequestItem (GenreOpinion -> a)

NewGenreArtworkFromRequest UUID InsertGenreArtworksRequestItem (GenreArtwork -> a)

IncrementViewsByOne Env [UUID] (Either GenreCommandError () -> a)

Instances

Functor GenreCommand

Defined in WikiMusic.Free.GenreCommand

Methods

fmap :: (a -> b) -> GenreCommand a -> GenreCommand b

(<$) :: a -> GenreCommand b -> GenreCommand a

Exec GenreCommand

Defined in WikiMusic.Sqlite.GenreCommand

Methods

execAlgebra :: GenreCommand (IO a) -> IO a

insertGenres :: GenreCommand :<: f => Env -> [Genre] -> Free f (Map UUID Genre)

insertGenreComments :: GenreCommand :<: f => Env -> [GenreComment] -> Free f (Map UUID GenreComment)

insertGenreArtworks :: GenreCommand :<: f => Env -> [GenreArtwork] -> Free f (Map UUID GenreArtwork)

upsertGenreOpinions :: GenreCommand :<: f => Env -> [GenreOpinion] -> Free f (Map UUID GenreOpinion)

insertGenreExternalSources :: GenreCommand :<: f => Env -> [GenreExternalSources] -> Free f (Map UUID GenreExternalSources)

deleteGenres :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())

deleteGenreComments :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())

deleteGenreArtworks :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())

deleteGenreOpinions :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())

deleteCommentsOfGenres :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())

deleteGenreExternalSources :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())

deleteArtworksOfGenres :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())

deleteOpinionsOfGenres :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())

updateGenreArtworkOrder :: GenreCommand :<: f => Env -> [GenreArtworkOrderUpdate] -> Free f (Either Text ())

updateGenres :: GenreCommand :<: f => Env -> Map UUID (Genre, Maybe GenreDelta) -> Free f (Either Text ())

updateGenreExternalSources :: GenreCommand :<: f => Env -> Map UUID (Genre, Maybe GenreDelta) -> Free f (Either Text ())

newGenreFromRequest :: GenreCommand :<: f => UUID -> InsertGenresRequestItem -> Free f Genre

newGenreCommentFromRequest :: GenreCommand :<: f => UUID -> InsertGenreCommentsRequestItem -> Free f GenreComment

newGenreOpinionFromRequest :: GenreCommand :<: f => UUID -> UpsertGenreOpinionsRequestItem -> Free f GenreOpinion

newGenreArtworkFromRequest :: GenreCommand :<: f => UUID -> InsertGenreArtworksRequestItem -> Free f GenreArtwork

data GenreCommandError

Constructors

PersistenceError Text

LogicError Text

Instances

Show GenreCommandError

Defined in WikiMusic.Free.GenreCommand

Methods

showsPrec :: Int -> GenreCommandError -> ShowS

show :: GenreCommandError -> String

showList :: [GenreCommandError] -> ShowS

Eq GenreCommandError

Defined in WikiMusic.Free.GenreCommand

Methods

(==) :: GenreCommandError -> GenreCommandError -> Bool

(/=) :: GenreCommandError -> GenreCommandError -> Bool

incrementViewsByOne :: GenreCommand :<: f => Env -> [UUID] -> Free f (Either GenreCommandError ())