heddit-0.0.3: Reddit API bindings
Copyright(c) 2021 Rory Tyler Hayford
LicenseBSD-3-Clause
Maintainerrory.hayford@protonmail.com
Stabilityexperimental
PortabilityGHC
Safe HaskellNone
LanguageHaskell2010

Network.Reddit.Types.Comment

Description

 
Synopsis

Documentation

data Comment Source #

A Reddit comment

Constructors

Comment 

Instances

Instances details
Eq Comment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Methods

(==) :: Comment -> Comment -> Bool #

(/=) :: Comment -> Comment -> Bool #

Show Comment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Generic Comment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Associated Types

type Rep Comment :: Type -> Type #

Methods

from :: Comment -> Rep Comment x #

to :: Rep Comment x -> Comment #

FromJSON Comment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Paginable Comment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

FromJSON (PostedItem Comment) Source # 
Instance details

Defined in Network.Reddit.Types.Item

type Rep Comment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep Comment = D1 ('MetaData "Comment" "Network.Reddit.Types.Comment" "heddit-0.0.3-9exHQM39kJOAEFyIAgEDk1" 'False) (C1 ('MetaCons "Comment" 'PrefixI 'True) ((((S1 ('MetaSel ('Just "commentID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 CommentID) :*: (S1 ('MetaSel ('Just "author") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Username) :*: S1 ('MetaSel ('Just "body") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Body))) :*: (S1 ('MetaSel ('Just "bodyHTML") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Body) :*: (S1 ('MetaSel ('Just "replies") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Seq ChildComment)) :*: S1 ('MetaSel ('Just "score") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Integer))))) :*: ((S1 ('MetaSel ('Just "ups") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Integer)) :*: (S1 ('MetaSel ('Just "downs") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Integer)) :*: S1 ('MetaSel ('Just "created") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 UTCTime))) :*: (S1 ('MetaSel ('Just "edited") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe UTCTime)) :*: (S1 ('MetaSel ('Just "subreddit") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 SubredditName) :*: S1 ('MetaSel ('Just "subredditID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 SubredditID))))) :*: (((S1 ('MetaSel ('Just "gilded") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Int) :*: (S1 ('MetaSel ('Just "scoreHidden") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "linkID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 SubmissionID))) :*: (S1 ('MetaSel ('Just "linkURL") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe URL)) :*: (S1 ('MetaSel ('Just "linkAuthor") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Username)) :*: S1 ('MetaSel ('Just "permaLink") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 URL)))) :*: ((S1 ('MetaSel ('Just "userReports") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Seq ItemReport)) :*: (S1 ('MetaSel ('Just "modReports") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Seq ItemReport)) :*: S1 ('MetaSel ('Just "numReports") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Integer)))) :*: (S1 ('MetaSel ('Just "distinguished") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Distinction)) :*: (S1 ('MetaSel ('Just "isSubmitter") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Bool) :*: S1 ('MetaSel ('Just "stickied") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Bool)))))))
type PaginateOptions Comment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type PaginateThing Comment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

newtype CommentID Source #

A Comment ID

Constructors

CommentID Text 

Instances

Instances details
Eq CommentID Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Ord CommentID Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Show CommentID Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Generic CommentID Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Associated Types

type Rep CommentID :: Type -> Type #

FromJSON CommentID Source # 
Instance details

Defined in Network.Reddit.Types.Comment

ToHttpApiData CommentID Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Thing CommentID Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep CommentID Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep CommentID = D1 ('MetaData "CommentID" "Network.Reddit.Types.Comment" "heddit-0.0.3-9exHQM39kJOAEFyIAgEDk1" 'True) (C1 ('MetaCons "CommentID" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))

data MoreComments Source #

A link to load more children Comments

Constructors

MoreComments 

Fields

Instances

Instances details
Eq MoreComments Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Show MoreComments Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Generic MoreComments Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Associated Types

type Rep MoreComments :: Type -> Type #

FromJSON MoreComments Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep MoreComments Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep MoreComments = D1 ('MetaData "MoreComments" "Network.Reddit.Types.Comment" "heddit-0.0.3-9exHQM39kJOAEFyIAgEDk1" 'False) (C1 ('MetaCons "MoreComments" 'PrefixI 'True) (S1 ('MetaSel ('Just "childIDs") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Seq CommentID)) :*: S1 ('MetaSel ('Just "count") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Integer)))

data ChildComment Source #

Represents a comments on a submission or replies to a comment, which can be actual Comments, or a list of children corresponding to "load more" or "continue this thread" links on Reddit's UI

Instances

Instances details
Eq ChildComment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Show ChildComment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Generic ChildComment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Associated Types

type Rep ChildComment :: Type -> Type #

FromJSON ChildComment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep ChildComment Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep ChildComment = D1 ('MetaData "ChildComment" "Network.Reddit.Types.Comment" "heddit-0.0.3-9exHQM39kJOAEFyIAgEDk1" 'False) (C1 ('MetaCons "TopLevel" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Comment)) :+: C1 ('MetaCons "More" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 MoreComments)))

data WithChildren Source #

This wraps the ChildComments of a Submission

Instances

Instances details
Eq WithChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Show WithChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Generic WithChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Associated Types

type Rep WithChildren :: Type -> Type #

FromJSON WithChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep WithChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep WithChildren = D1 ('MetaData "WithChildren" "Network.Reddit.Types.Comment" "heddit-0.0.3-9exHQM39kJOAEFyIAgEDk1" 'True) (C1 ('MetaCons "WithChildren" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Seq ChildComment))))

data WithReplies Source #

This wraps a Comment which has been fetched with its ChildComments

Instances

Instances details
Eq WithReplies Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Show WithReplies Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Generic WithReplies Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Associated Types

type Rep WithReplies :: Type -> Type #

FromJSON WithReplies Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep WithReplies Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep WithReplies = D1 ('MetaData "WithReplies" "Network.Reddit.Types.Comment" "heddit-0.0.3-9exHQM39kJOAEFyIAgEDk1" 'True) (C1 ('MetaCons "WithReplies" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Comment)))

data LoadedChildren Source #

Instances

Instances details
Eq LoadedChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Show LoadedChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Generic LoadedChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

Associated Types

type Rep LoadedChildren :: Type -> Type #

FromJSON LoadedChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep LoadedChildren Source # 
Instance details

Defined in Network.Reddit.Types.Comment

type Rep LoadedChildren = D1 ('MetaData "LoadedChildren" "Network.Reddit.Types.Comment" "heddit-0.0.3-9exHQM39kJOAEFyIAgEDk1" 'True) (C1 ('MetaCons "LoadedChildren" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Seq ChildComment))))