WikiMusic.Free.ArtistCommand

Documentation

data ArtistCommand a

Constructors

InsertArtists Env [Artist] (() -> a)

InsertArtistComments Env [ArtistComment] (() -> a)

InsertArtistArtworks Env [ArtistArtwork] (Map UUID ArtistArtwork -> a)

UpsertArtistOpinions Env [ArtistOpinion] (Map UUID ArtistOpinion -> a)

InsertArtistExternalSources Env [ArtistExternalSources] (Map UUID ArtistExternalSources -> a)

DeleteArtists Env [UUID] (Either ArtistCommandError () -> a)

DeleteArtistComments Env [UUID] (Either ArtistCommandError () -> a)

DeleteArtistArtworks Env [UUID] (Either ArtistCommandError () -> a)

DeleteArtistOpinions Env [UUID] (Either ArtistCommandError () -> a)

DeleteCommentsOfArtists Env [UUID] (Either ArtistCommandError () -> a)

DeleteArtistExternalSources Env [UUID] (Either ArtistCommandError () -> a)

DeleteArtworksOfArtists Env [UUID] (Either ArtistCommandError () -> a)

DeleteOpinionsOfArtists Env [UUID] (Either ArtistCommandError () -> a)

UpdateArtistArtworkOrder Env [ArtistArtworkOrderUpdate] (Either Text () -> a)

UpdateArtists Env (Map UUID (Artist, Maybe ArtistDelta)) (Either Text () -> a)

UpdateArtistExternalSources Env (Map UUID (Artist, Maybe ArtistDelta)) (Either Text () -> a)

NewArtistFromRequest UUID InsertArtistsRequestItem (Artist -> a)

NewArtistCommentFromRequest UUID InsertArtistCommentsRequestItem (ArtistComment -> a)

NewArtistOpinionFromRequest UUID UpsertArtistOpinionsRequestItem (ArtistOpinion -> a)

NewArtistArtworkFromRequest UUID InsertArtistArtworksRequestItem (ArtistArtwork -> a)

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

Instances

Functor ArtistCommand

Defined in WikiMusic.Free.ArtistCommand

Methods

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

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

Exec ArtistCommand

Defined in WikiMusic.Sqlite.ArtistCommand

Methods

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

insertArtists :: ArtistCommand :<: f => Env -> [Artist] -> Free f ()

insertArtistComments :: ArtistCommand :<: f => Env -> [ArtistComment] -> Free f ()

insertArtistArtworks :: ArtistCommand :<: f => Env -> [ArtistArtwork] -> Free f (Map UUID ArtistArtwork)

upsertArtistOpinions :: ArtistCommand :<: f => Env -> [ArtistOpinion] -> Free f (Map UUID ArtistOpinion)

insertArtistExternalSources :: ArtistCommand :<: f => Env -> [ArtistExternalSources] -> Free f (Map UUID ArtistExternalSources)

deleteArtists :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())

deleteArtistComments :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())

deleteArtistArtworks :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())

deleteArtistOpinions :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())

deleteCommentsOfArtists :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())

deleteArtistExternalSources :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())

deleteArtworksOfArtists :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())

deleteOpinionsOfArtists :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())

updateArtistArtworkOrder :: ArtistCommand :<: f => Env -> [ArtistArtworkOrderUpdate] -> Free f (Either Text ())

updateArtists :: ArtistCommand :<: f => Env -> Map UUID (Artist, Maybe ArtistDelta) -> Free f (Either Text ())

updateArtistExternalSources :: ArtistCommand :<: f => Env -> Map UUID (Artist, Maybe ArtistDelta) -> Free f (Either Text ())

newArtistFromRequest :: ArtistCommand :<: f => UUID -> InsertArtistsRequestItem -> Free f Artist

newArtistCommentFromRequest :: ArtistCommand :<: f => UUID -> InsertArtistCommentsRequestItem -> Free f ArtistComment

newArtistOpinionFromRequest :: ArtistCommand :<: f => UUID -> UpsertArtistOpinionsRequestItem -> Free f ArtistOpinion

newArtistArtworkFromRequest :: ArtistCommand :<: f => UUID -> InsertArtistArtworksRequestItem -> Free f ArtistArtwork

data ArtistCommandError

Constructors

PersistenceError Text

LogicError Text

Instances

Show ArtistCommandError

Defined in WikiMusic.Free.ArtistCommand

Methods

showsPrec :: Int -> ArtistCommandError -> ShowS

show :: ArtistCommandError -> String

showList :: [ArtistCommandError] -> ShowS

Eq ArtistCommandError

Defined in WikiMusic.Free.ArtistCommand

Methods

(==) :: ArtistCommandError -> ArtistCommandError -> Bool

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

incrementViewsByOne :: ArtistCommand :<: f => Env -> [UUID] -> Free f (Either ArtistCommandError ())