Safe Haskell	Safe-Inferred
Language	GHC2021

Conduit.Features.Articles.DB

Contents

Orphan instances

Documentation

migrateArticleTables :: Migration Source #

createArticleFunctions :: MonadIO m => SqlPersistT m () Source #

assumingUserIsOwner :: forall table id m a e. (OwnableEntity table, SqlKey table id, MonadIO m, Show e) => e -> UserID -> id -> SqlPersistT m a -> SqlPersistT m a Source #

mkManyArticles :: [(Entity Article, Entity User, Value Bool, Value Bool, Value Int)] -> ManyArticles Source #

mkOneArticle :: (Entity Article, Entity User, Value Bool, Value Bool, Value Int) -> OneArticle Source #

data Article Source #

Constructors

Article
Fields articleAuthor :: !UserId articleSlug :: !Text articleTitle :: !Text articleDesc :: !Text articleBody :: !Text articleTags :: ![Text] articleCreated :: !UTCTime articleUpdated :: !UTCTime

Instances

Instances details

PersistEntity Article Source #
Instance details Defined in Conduit.Features.Articles.DB Associated Types type PersistEntityBackend Article # data Key Article # data EntityField Article :: Type -> Type # data Unique Article # Methods keyToValues :: Key Article -> [PersistValue] # keyFromValues :: [PersistValue] -> Either Text (Key Article) # persistIdField :: EntityField Article (Key Article) # entityDef :: proxy Article -> EntityDef # persistFieldDef :: EntityField Article typ -> FieldDef # toPersistFields :: Article -> [PersistValue] # fromPersistValues :: [PersistValue] -> Either Text Article # tabulateEntityA :: Applicative f => (forall a. EntityField Article a -> f a) -> f (Entity Article) # persistUniqueKeys :: Article -> [Unique Article] # persistUniqueToFieldNames :: Unique Article -> NonEmpty (FieldNameHS, FieldNameDB) # persistUniqueToValues :: Unique Article -> [PersistValue] # fieldLens :: EntityField Article field -> forall (f :: Type -> Type). Functor f => (field -> f field) -> Entity Article -> f (Entity Article) # keyFromRecordM :: Maybe (Article -> Key Article) #
SafeToInsert Article Source #
Instance details Defined in Conduit.Features.Articles.DB
PersistField Article Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toPersistValue :: Article -> PersistValue # fromPersistValue :: PersistValue -> Either Text Article #
AtLeastOneUniqueKey Article Source #
Instance details Defined in Conduit.Features.Articles.DB Methods requireUniquesP :: Article -> NonEmpty (Unique Article) #
(TypeError (MultipleUniqueKeysError Article) :: Constraint) => OnlyOneUniqueKey Article Source #
Instance details Defined in Conduit.Features.Articles.DB Methods onlyUniqueP :: Article -> Unique Article #
PersistFieldSql Article Source #
Instance details Defined in Conduit.Features.Articles.DB Methods sqlType :: Proxy Article -> SqlType #
ToBackendKey SqlBackend Article Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toBackendKey :: Key Article -> BackendKey SqlBackend # fromBackendKey :: BackendKey SqlBackend -> Key Article #
SqlKey Article ArticleID Source #
Instance details Defined in Conduit.Features.Articles.DB Methods sqlKey2ID :: Key Article -> ArticleID Source # id2sqlKey :: ArticleID -> Key Article Source #
SymbolToField "author" Article UserId Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article UserId #
SymbolToField "body" Article Text Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article Text #
SymbolToField "created" Article UTCTime Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article UTCTime #
SymbolToField "desc" Article Text Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article Text #
SymbolToField "slug" Article Text Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article Text #
SymbolToField "title" Article Text Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article Text #
SymbolToField "updated" Article UTCTime Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article UTCTime #
SymbolToField "id" Article (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article (Key Article) #
SymbolToField "tags" Article [Text] Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Article [Text] #
FromJSON (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods parseJSON :: Value -> Parser (Key Article) # parseJSONList :: Value -> Parser [Key Article] # omittedField :: Maybe (Key Article) #
ToJSON (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toJSON :: Key Article -> Value # toEncoding :: Key Article -> Encoding # toJSONList :: [Key Article] -> Value # toEncodingList :: [Key Article] -> Encoding # omitField :: Key Article -> Bool #
Read (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods readsPrec :: Int -> ReadS (Key Article) # readList :: ReadS [Key Article] # readPrec :: ReadPrec (Key Article) # readListPrec :: ReadPrec [Key Article] #
Show (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods showsPrec :: Int -> Key Article -> ShowS # show :: Key Article -> String # showList :: [Key Article] -> ShowS #
Eq (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods (==) :: Key Article -> Key Article -> Bool # (/=) :: Key Article -> Key Article -> Bool #
Ord (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods compare :: Key Article -> Key Article -> Ordering # (<) :: Key Article -> Key Article -> Bool # (<=) :: Key Article -> Key Article -> Bool # (>) :: Key Article -> Key Article -> Bool # (>=) :: Key Article -> Key Article -> Bool # max :: Key Article -> Key Article -> Key Article # min :: Key Article -> Key Article -> Key Article #
FromHttpApiData (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods parseUrlPiece :: Text -> Either Text (Key Article) # parseHeader :: ByteString -> Either Text (Key Article) # parseQueryParam :: Text -> Either Text (Key Article) #
ToHttpApiData (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toUrlPiece :: Key Article -> Text # toEncodedUrlPiece :: Key Article -> Builder # toHeader :: Key Article -> ByteString # toQueryParam :: Key Article -> Text # toEncodedQueryParam :: Key Article -> Builder #
PathPiece (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods fromPathPiece :: Text -> Maybe (Key Article) # toPathPiece :: Key Article -> Text #
PersistField (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toPersistValue :: Key Article -> PersistValue # fromPersistValue :: PersistValue -> Either Text (Key Article) #
PersistFieldSql (Key Article) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods sqlType :: Proxy (Key Article) -> SqlType #
data EntityField Article typ Source #
Instance details Defined in Conduit.Features.Articles.DB data EntityField Article typ = typ ~ ArticleId => ArticleId \| typ ~ UserId => ArticleAuthor \| typ ~ Text => ArticleSlug \| typ ~ Text => ArticleTitle \| typ ~ Text => ArticleDesc \| typ ~ Text => ArticleBody \| typ ~ [Text] => ArticleTags \| typ ~ UTCTime => ArticleCreated \| typ ~ UTCTime => ArticleUpdated
newtype Key Article Source #
Instance details Defined in Conduit.Features.Articles.DB newtype Key Article = ArticleKey { unArticleKey :: BackendKey SqlBackend }
type PersistEntityBackend Article Source #
Instance details Defined in Conduit.Features.Articles.DB type PersistEntityBackend Article = SqlBackend
data Unique Article Source #
Instance details Defined in Conduit.Features.Articles.DB data Unique Article = UniqueSlug Text \| UniqueTitle Text

data Favorite Source #

Constructors

Favorite
Fields favoriteUser :: !UserId favoriteArticle :: !ArticleId

Instances

Instances details

PersistEntity Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB Associated Types type PersistEntityBackend Favorite # data Key Favorite # data EntityField Favorite :: Type -> Type # data Unique Favorite # Methods keyToValues :: Key Favorite -> [PersistValue] # keyFromValues :: [PersistValue] -> Either Text (Key Favorite) # persistIdField :: EntityField Favorite (Key Favorite) # entityDef :: proxy Favorite -> EntityDef # persistFieldDef :: EntityField Favorite typ -> FieldDef # toPersistFields :: Favorite -> [PersistValue] # fromPersistValues :: [PersistValue] -> Either Text Favorite # tabulateEntityA :: Applicative f => (forall a. EntityField Favorite a -> f a) -> f (Entity Favorite) # persistUniqueKeys :: Favorite -> [Unique Favorite] # persistUniqueToFieldNames :: Unique Favorite -> NonEmpty (FieldNameHS, FieldNameDB) # persistUniqueToValues :: Unique Favorite -> [PersistValue] # fieldLens :: EntityField Favorite field -> forall (f :: Type -> Type). Functor f => (field -> f field) -> Entity Favorite -> f (Entity Favorite) # keyFromRecordM :: Maybe (Favorite -> Key Favorite) #
SafeToInsert Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB
PersistField Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toPersistValue :: Favorite -> PersistValue # fromPersistValue :: PersistValue -> Either Text Favorite #
AtLeastOneUniqueKey Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB Methods requireUniquesP :: Favorite -> NonEmpty (Unique Favorite) #
OnlyOneUniqueKey Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB Methods onlyUniqueP :: Favorite -> Unique Favorite #
PersistFieldSql Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB Methods sqlType :: Proxy Favorite -> SqlType #
SymbolToField "user" Favorite UserId Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Favorite UserId #
SymbolToField "id" Favorite (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Favorite (Key Favorite) #
FromJSON (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods parseJSON :: Value -> Parser (Key Favorite) # parseJSONList :: Value -> Parser [Key Favorite] # omittedField :: Maybe (Key Favorite) #
ToJSON (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toJSON :: Key Favorite -> Value # toEncoding :: Key Favorite -> Encoding # toJSONList :: [Key Favorite] -> Value # toEncodingList :: [Key Favorite] -> Encoding # omitField :: Key Favorite -> Bool #
Generic (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Associated Types type Rep (Key Favorite) :: Type -> Type # Methods from :: Key Favorite -> Rep (Key Favorite) x # to :: Rep (Key Favorite) x -> Key Favorite #
Read (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods readsPrec :: Int -> ReadS (Key Favorite) # readList :: ReadS [Key Favorite] # readPrec :: ReadPrec (Key Favorite) # readListPrec :: ReadPrec [Key Favorite] #
Show (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods showsPrec :: Int -> Key Favorite -> ShowS # show :: Key Favorite -> String # showList :: [Key Favorite] -> ShowS #
Eq (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods (==) :: Key Favorite -> Key Favorite -> Bool # (/=) :: Key Favorite -> Key Favorite -> Bool #
Ord (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods compare :: Key Favorite -> Key Favorite -> Ordering # (<) :: Key Favorite -> Key Favorite -> Bool # (<=) :: Key Favorite -> Key Favorite -> Bool # (>) :: Key Favorite -> Key Favorite -> Bool # (>=) :: Key Favorite -> Key Favorite -> Bool # max :: Key Favorite -> Key Favorite -> Key Favorite # min :: Key Favorite -> Key Favorite -> Key Favorite #
PersistField (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toPersistValue :: Key Favorite -> PersistValue # fromPersistValue :: PersistValue -> Either Text (Key Favorite) #
PersistFieldSql (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods sqlType :: Proxy (Key Favorite) -> SqlType #
data EntityField Favorite typ Source #
Instance details Defined in Conduit.Features.Articles.DB data EntityField Favorite typ = typ ~ FavoriteId => FavoriteId \| typ ~ UserId => FavoriteUser \| typ ~ ArticleId => FavoriteArticle
data Key Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB data Key Favorite = FavoriteKey { favoriteKeyarticle :: ArticleId favoriteKeyuser :: UserId }
type PersistEntityBackend Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB type PersistEntityBackend Favorite = SqlBackend
data Unique Favorite Source #
Instance details Defined in Conduit.Features.Articles.DB data Unique Favorite = FavoritePrimaryKey ArticleId UserId
type Rep (Key Favorite) Source #
Instance details Defined in Conduit.Features.Articles.DB type Rep (Key Favorite)

data Comment Source #

Constructors

Comment
Fields commentAuthor :: !UserId commentArticle :: !ArticleId commentBody :: !Text commentCreated :: !UTCTime commentUpdated :: !UTCTime

Instances

Instances details

PersistEntity Comment Source #
Instance details Defined in Conduit.Features.Articles.DB Associated Types type PersistEntityBackend Comment # data Key Comment # data EntityField Comment :: Type -> Type # data Unique Comment # Methods keyToValues :: Key Comment -> [PersistValue] # keyFromValues :: [PersistValue] -> Either Text (Key Comment) # persistIdField :: EntityField Comment (Key Comment) # entityDef :: proxy Comment -> EntityDef # persistFieldDef :: EntityField Comment typ -> FieldDef # toPersistFields :: Comment -> [PersistValue] # fromPersistValues :: [PersistValue] -> Either Text Comment # tabulateEntityA :: Applicative f => (forall a. EntityField Comment a -> f a) -> f (Entity Comment) # persistUniqueKeys :: Comment -> [Unique Comment] # persistUniqueToFieldNames :: Unique Comment -> NonEmpty (FieldNameHS, FieldNameDB) # persistUniqueToValues :: Unique Comment -> [PersistValue] # fieldLens :: EntityField Comment field -> forall (f :: Type -> Type). Functor f => (field -> f field) -> Entity Comment -> f (Entity Comment) # keyFromRecordM :: Maybe (Comment -> Key Comment) #
SafeToInsert Comment Source #
Instance details Defined in Conduit.Features.Articles.DB
PersistField Comment Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toPersistValue :: Comment -> PersistValue # fromPersistValue :: PersistValue -> Either Text Comment #
(TypeError (MultipleUniqueKeysError Comment) :: Constraint) => AtLeastOneUniqueKey Comment Source #
Instance details Defined in Conduit.Features.Articles.DB Methods requireUniquesP :: Comment -> NonEmpty (Unique Comment) #
(TypeError (NoUniqueKeysError Comment) :: Constraint) => OnlyOneUniqueKey Comment Source #
Instance details Defined in Conduit.Features.Articles.DB Methods onlyUniqueP :: Comment -> Unique Comment #
PersistFieldSql Comment Source #
Instance details Defined in Conduit.Features.Articles.DB Methods sqlType :: Proxy Comment -> SqlType #
ToBackendKey SqlBackend Comment Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toBackendKey :: Key Comment -> BackendKey SqlBackend # fromBackendKey :: BackendKey SqlBackend -> Key Comment #
SqlKey Comment CommentID Source #
Instance details Defined in Conduit.Features.Articles.DB Methods sqlKey2ID :: Key Comment -> CommentID Source # id2sqlKey :: CommentID -> Key Comment Source #
SymbolToField "author" Comment UserId Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Comment UserId #
SymbolToField "body" Comment Text Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Comment Text #
SymbolToField "created" Comment UTCTime Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Comment UTCTime #
SymbolToField "updated" Comment UTCTime Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Comment UTCTime #
SymbolToField "id" Comment (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods symbolToField :: EntityField Comment (Key Comment) #
FromJSON (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods parseJSON :: Value -> Parser (Key Comment) # parseJSONList :: Value -> Parser [Key Comment] # omittedField :: Maybe (Key Comment) #
ToJSON (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toJSON :: Key Comment -> Value # toEncoding :: Key Comment -> Encoding # toJSONList :: [Key Comment] -> Value # toEncodingList :: [Key Comment] -> Encoding # omitField :: Key Comment -> Bool #
Read (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods readsPrec :: Int -> ReadS (Key Comment) # readList :: ReadS [Key Comment] # readPrec :: ReadPrec (Key Comment) # readListPrec :: ReadPrec [Key Comment] #
Show (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods showsPrec :: Int -> Key Comment -> ShowS # show :: Key Comment -> String # showList :: [Key Comment] -> ShowS #
Eq (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods (==) :: Key Comment -> Key Comment -> Bool # (/=) :: Key Comment -> Key Comment -> Bool #
Ord (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods compare :: Key Comment -> Key Comment -> Ordering # (<) :: Key Comment -> Key Comment -> Bool # (<=) :: Key Comment -> Key Comment -> Bool # (>) :: Key Comment -> Key Comment -> Bool # (>=) :: Key Comment -> Key Comment -> Bool # max :: Key Comment -> Key Comment -> Key Comment # min :: Key Comment -> Key Comment -> Key Comment #
FromHttpApiData (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods parseUrlPiece :: Text -> Either Text (Key Comment) # parseHeader :: ByteString -> Either Text (Key Comment) # parseQueryParam :: Text -> Either Text (Key Comment) #
ToHttpApiData (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toUrlPiece :: Key Comment -> Text # toEncodedUrlPiece :: Key Comment -> Builder # toHeader :: Key Comment -> ByteString # toQueryParam :: Key Comment -> Text # toEncodedQueryParam :: Key Comment -> Builder #
PathPiece (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods fromPathPiece :: Text -> Maybe (Key Comment) # toPathPiece :: Key Comment -> Text #
PersistField (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods toPersistValue :: Key Comment -> PersistValue # fromPersistValue :: PersistValue -> Either Text (Key Comment) #
PersistFieldSql (Key Comment) Source #
Instance details Defined in Conduit.Features.Articles.DB Methods sqlType :: Proxy (Key Comment) -> SqlType #
data EntityField Comment typ Source #
Instance details Defined in Conduit.Features.Articles.DB data EntityField Comment typ = typ ~ CommentId => CommentId \| typ ~ UserId => CommentAuthor \| typ ~ ArticleId => CommentArticle \| typ ~ Text => CommentBody \| typ ~ UTCTime => CommentCreated \| typ ~ UTCTime => CommentUpdated
newtype Key Comment Source #
Instance details Defined in Conduit.Features.Articles.DB newtype Key Comment = CommentKey { unCommentKey :: BackendKey SqlBackend }
type PersistEntityBackend Comment Source #
Instance details Defined in Conduit.Features.Articles.DB type PersistEntityBackend Comment = SqlBackend
data Unique Comment Source #
Instance details Defined in Conduit.Features.Articles.DB data Unique Comment

Orphan instances

SqlKey Article ArticleID Source #
Instance details Methods sqlKey2ID :: Key Article -> ArticleID Source # id2sqlKey :: ArticleID -> Key Article Source #
SqlKey Comment CommentID Source #
Instance details Methods sqlKey2ID :: Key Comment -> CommentID Source # id2sqlKey :: CommentID -> Key Comment Source #