Safe Haskell	None
Language	Haskell2010

Gerrit.Data.Change

Synopsis

data GerritQuery
- = Status GerritChangeStatus
- | Owner Text
- | CommitMessage Text
- | Project Text
- | ChangeId Text
- | After UTCTime
data GerritChangeStatus
- = NEW
- | MERGED
- | ABANDONED
- | DRAFT
data GerritRevisionKind
- = REWORK
- | TRIVIAL_REBASE
- | MERGE_FIRST_PARENT_UPDATE
- | NO_CODE_CHANGE
- | NO_CHANGE
data GerritFile = GerritFile {
- gfStatus :: Maybe Text
- gfLinesInserted :: Maybe Int
- gfLinesDeleted :: Maybe Int
- gfSizeDelta :: Maybe Int
- gfSize :: Maybe Int
}
data GerritCommit = GerritCommit {
- cAuthor :: GerritCommitAuthor
- cCommitter :: GerritCommitAuthor
- cSubject :: Text
- cMessage :: Text
}
data GerritRevision = GerritRevision {
- grRef :: Text
- grKind :: GerritRevisionKind
- grFiles :: Map Text GerritFile
- grCommit :: GerritCommit
- grUploader :: GerritAuthor
}
data GerritDetailedLabelVote = GerritDetailedLabelVote {
- value :: Maybe Int
- account_id :: Int
}
data GerritDetailedLabel = GerritDetailedLabel {
- all :: Maybe [GerritDetailedLabelVote]
- default_value :: Int
}
data GerritAuthor = GerritAuthor {
- aAccountId :: Int
- aName :: Text
- aEmail :: Maybe Text
- aUsername :: Maybe Text
}
data GerritCommitAuthor = GerritCommitAuthor {
- caName :: Text
- caEmail :: Maybe Text
- caDate :: GerritTime
}
data GerritChangeMessage = GerritChangeMessage {
- mId :: Text
- mAuthor :: Maybe GerritAuthor
- mDate :: GerritTime
- mMessage :: Text
}
data GerritChange = GerritChange {
- id :: Text
- project :: Text
- branch :: Text
- hashtags :: [Text]
- subject :: Text
- status :: GerritChangeStatus
- mergeable :: Maybe Bool
- revisions :: Map Text (Maybe GerritRevision)
- current_revision :: Maybe Text
- number :: Int
- labels :: Map Text GerritDetailedLabel
- messages :: [GerritChangeMessage]
- owner :: GerritAuthor
- created :: GerritTime
- updated :: GerritTime
- submitted :: Maybe GerritTime
- submitter :: Maybe GerritAuthor
- topic :: Maybe Text
- insertions :: Int
- deletions :: Int
- more_changes :: Maybe Bool
}
newtype GerritTime = GerritTime {
- unGerritTime :: UTCTime
}
changeQS :: Int -> [GerritQuery] -> Maybe Int -> Text
queryText :: GerritQuery -> Text
defaultQueryChangeOptions :: Text
hasLabel :: Text -> Int -> GerritChange -> Bool

Documentation

data GerritQuery Source #

Constructors

Status GerritChangeStatus
Owner Text
CommitMessage Text
Project Text
ChangeId Text
After UTCTime

Instances

Instances details

Eq GerritQuery Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritQuery -> GerritQuery -> Bool # (/=) :: GerritQuery -> GerritQuery -> Bool #
Show GerritQuery Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritQuery -> ShowS # show :: GerritQuery -> String # showList :: [GerritQuery] -> ShowS #

data GerritChangeStatus Source #

Constructors

NEW
MERGED
ABANDONED
DRAFT

Instances

Instances details

Eq GerritChangeStatus Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritChangeStatus -> GerritChangeStatus -> Bool # (/=) :: GerritChangeStatus -> GerritChangeStatus -> Bool #
Show GerritChangeStatus Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritChangeStatus -> ShowS # show :: GerritChangeStatus -> String # showList :: [GerritChangeStatus] -> ShowS #
Generic GerritChangeStatus Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritChangeStatus :: Type -> Type # Methods from :: GerritChangeStatus -> Rep GerritChangeStatus x # to :: Rep GerritChangeStatus x -> GerritChangeStatus #
FromJSON GerritChangeStatus Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritChangeStatus # parseJSONList :: Value -> Parser [GerritChangeStatus] #
type Rep GerritChangeStatus Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritChangeStatus = D1 ('MetaData "GerritChangeStatus" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) ((C1 ('MetaCons "NEW" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "MERGED" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "ABANDONED" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "DRAFT" 'PrefixI 'False) (U1 :: Type -> Type)))

data GerritRevisionKind Source #

Constructors

REWORK
TRIVIAL_REBASE
MERGE_FIRST_PARENT_UPDATE
NO_CODE_CHANGE
NO_CHANGE

Instances

Instances details

Eq GerritRevisionKind Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritRevisionKind -> GerritRevisionKind -> Bool # (/=) :: GerritRevisionKind -> GerritRevisionKind -> Bool #
Show GerritRevisionKind Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritRevisionKind -> ShowS # show :: GerritRevisionKind -> String # showList :: [GerritRevisionKind] -> ShowS #
Generic GerritRevisionKind Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritRevisionKind :: Type -> Type # Methods from :: GerritRevisionKind -> Rep GerritRevisionKind x # to :: Rep GerritRevisionKind x -> GerritRevisionKind #
FromJSON GerritRevisionKind Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritRevisionKind # parseJSONList :: Value -> Parser [GerritRevisionKind] #
type Rep GerritRevisionKind Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritRevisionKind = D1 ('MetaData "GerritRevisionKind" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) ((C1 ('MetaCons "REWORK" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "TRIVIAL_REBASE" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "MERGE_FIRST_PARENT_UPDATE" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "NO_CODE_CHANGE" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "NO_CHANGE" 'PrefixI 'False) (U1 :: Type -> Type))))

data GerritFile Source #

Constructors

GerritFile
Fields gfStatus :: Maybe Text gfLinesInserted :: Maybe Int gfLinesDeleted :: Maybe Int gfSizeDelta :: Maybe Int gfSize :: Maybe Int

Instances

Instances details

Eq GerritFile Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritFile -> GerritFile -> Bool # (/=) :: GerritFile -> GerritFile -> Bool #
Show GerritFile Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritFile -> ShowS # show :: GerritFile -> String # showList :: [GerritFile] -> ShowS #
Generic GerritFile Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritFile :: Type -> Type # Methods from :: GerritFile -> Rep GerritFile x # to :: Rep GerritFile x -> GerritFile #
FromJSON GerritFile Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritFile # parseJSONList :: Value -> Parser [GerritFile] #
type Rep GerritFile Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritFile = D1 ('MetaData "GerritFile" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritFile" 'PrefixI 'True) ((S1 ('MetaSel ('Just "gfStatus") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :: S1 ('MetaSel ('Just "gfLinesInserted") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int))) :: (S1 ('MetaSel ('Just "gfLinesDeleted") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)) :: (S1 ('MetaSel ('Just "gfSizeDelta") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)) :: S1 ('MetaSel ('Just "gfSize") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int))))))

data GerritCommit Source #

Constructors

GerritCommit
Fields cAuthor :: GerritCommitAuthor cCommitter :: GerritCommitAuthor cSubject :: Text cMessage :: Text

Instances

Instances details

Eq GerritCommit Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritCommit -> GerritCommit -> Bool # (/=) :: GerritCommit -> GerritCommit -> Bool #
Show GerritCommit Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritCommit -> ShowS # show :: GerritCommit -> String # showList :: [GerritCommit] -> ShowS #
Generic GerritCommit Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritCommit :: Type -> Type # Methods from :: GerritCommit -> Rep GerritCommit x # to :: Rep GerritCommit x -> GerritCommit #
FromJSON GerritCommit Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritCommit # parseJSONList :: Value -> Parser [GerritCommit] #
type Rep GerritCommit Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritCommit = D1 ('MetaData "GerritCommit" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritCommit" 'PrefixI 'True) ((S1 ('MetaSel ('Just "cAuthor") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritCommitAuthor) :: S1 ('MetaSel ('Just "cCommitter") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritCommitAuthor)) :: (S1 ('MetaSel ('Just "cSubject") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "cMessage") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))))

data GerritRevision Source #

Constructors

GerritRevision
Fields grRef :: Text grKind :: GerritRevisionKind grFiles :: Map Text GerritFile grCommit :: GerritCommit grUploader :: GerritAuthor

Instances

Instances details

Eq GerritRevision Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritRevision -> GerritRevision -> Bool # (/=) :: GerritRevision -> GerritRevision -> Bool #
Show GerritRevision Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritRevision -> ShowS # show :: GerritRevision -> String # showList :: [GerritRevision] -> ShowS #
Generic GerritRevision Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritRevision :: Type -> Type # Methods from :: GerritRevision -> Rep GerritRevision x # to :: Rep GerritRevision x -> GerritRevision #
FromJSON GerritRevision Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritRevision # parseJSONList :: Value -> Parser [GerritRevision] #
type Rep GerritRevision Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritRevision = D1 ('MetaData "GerritRevision" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritRevision" 'PrefixI 'True) ((S1 ('MetaSel ('Just "grRef") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :: S1 ('MetaSel ('Just "grKind") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritRevisionKind)) :: (S1 ('MetaSel ('Just "grFiles") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map Text GerritFile)) :: (S1 ('MetaSel ('Just "grCommit") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritCommit) :: S1 ('MetaSel ('Just "grUploader") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritAuthor)))))

data GerritDetailedLabelVote Source #

Constructors

GerritDetailedLabelVote
Fields value :: Maybe Int account_id :: Int

Instances

Instances details

Eq GerritDetailedLabelVote Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritDetailedLabelVote -> GerritDetailedLabelVote -> Bool # (/=) :: GerritDetailedLabelVote -> GerritDetailedLabelVote -> Bool #
Show GerritDetailedLabelVote Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritDetailedLabelVote -> ShowS # show :: GerritDetailedLabelVote -> String # showList :: [GerritDetailedLabelVote] -> ShowS #
Generic GerritDetailedLabelVote Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritDetailedLabelVote :: Type -> Type # Methods from :: GerritDetailedLabelVote -> Rep GerritDetailedLabelVote x # to :: Rep GerritDetailedLabelVote x -> GerritDetailedLabelVote #
FromJSON GerritDetailedLabelVote Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritDetailedLabelVote # parseJSONList :: Value -> Parser [GerritDetailedLabelVote] #
type Rep GerritDetailedLabelVote Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritDetailedLabelVote = D1 ('MetaData "GerritDetailedLabelVote" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritDetailedLabelVote" 'PrefixI 'True) (S1 ('MetaSel ('Just "value") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)) :*: S1 ('MetaSel ('Just "account_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)))

data GerritDetailedLabel Source #

Constructors

GerritDetailedLabel
Fields all :: Maybe [GerritDetailedLabelVote] default_value :: Int

Instances

Instances details

Eq GerritDetailedLabel Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritDetailedLabel -> GerritDetailedLabel -> Bool # (/=) :: GerritDetailedLabel -> GerritDetailedLabel -> Bool #
Show GerritDetailedLabel Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritDetailedLabel -> ShowS # show :: GerritDetailedLabel -> String # showList :: [GerritDetailedLabel] -> ShowS #
Generic GerritDetailedLabel Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritDetailedLabel :: Type -> Type # Methods from :: GerritDetailedLabel -> Rep GerritDetailedLabel x # to :: Rep GerritDetailedLabel x -> GerritDetailedLabel #
FromJSON GerritDetailedLabel Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritDetailedLabel # parseJSONList :: Value -> Parser [GerritDetailedLabel] #
type Rep GerritDetailedLabel Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritDetailedLabel = D1 ('MetaData "GerritDetailedLabel" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritDetailedLabel" 'PrefixI 'True) (S1 ('MetaSel ('Just "all") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe [GerritDetailedLabelVote])) :*: S1 ('MetaSel ('Just "default_value") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)))

data GerritAuthor Source #

Constructors

GerritAuthor
Fields aAccountId :: Int aName :: Text aEmail :: Maybe Text aUsername :: Maybe Text

Instances

Instances details

Eq GerritAuthor Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritAuthor -> GerritAuthor -> Bool # (/=) :: GerritAuthor -> GerritAuthor -> Bool #
Show GerritAuthor Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritAuthor -> ShowS # show :: GerritAuthor -> String # showList :: [GerritAuthor] -> ShowS #
Generic GerritAuthor Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritAuthor :: Type -> Type # Methods from :: GerritAuthor -> Rep GerritAuthor x # to :: Rep GerritAuthor x -> GerritAuthor #
FromJSON GerritAuthor Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritAuthor # parseJSONList :: Value -> Parser [GerritAuthor] #
type Rep GerritAuthor Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritAuthor = D1 ('MetaData "GerritAuthor" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritAuthor" 'PrefixI 'True) ((S1 ('MetaSel ('Just "aAccountId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :: S1 ('MetaSel ('Just "aName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :: (S1 ('MetaSel ('Just "aEmail") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "aUsername") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))

data GerritCommitAuthor Source #

Constructors

GerritCommitAuthor
Fields caName :: Text caEmail :: Maybe Text caDate :: GerritTime

Instances

Instances details

Eq GerritCommitAuthor Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritCommitAuthor -> GerritCommitAuthor -> Bool # (/=) :: GerritCommitAuthor -> GerritCommitAuthor -> Bool #
Show GerritCommitAuthor Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritCommitAuthor -> ShowS # show :: GerritCommitAuthor -> String # showList :: [GerritCommitAuthor] -> ShowS #
Generic GerritCommitAuthor Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritCommitAuthor :: Type -> Type # Methods from :: GerritCommitAuthor -> Rep GerritCommitAuthor x # to :: Rep GerritCommitAuthor x -> GerritCommitAuthor #
FromJSON GerritCommitAuthor Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritCommitAuthor # parseJSONList :: Value -> Parser [GerritCommitAuthor] #
type Rep GerritCommitAuthor Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritCommitAuthor = D1 ('MetaData "GerritCommitAuthor" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritCommitAuthor" 'PrefixI 'True) (S1 ('MetaSel ('Just "caName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :: (S1 ('MetaSel ('Just "caEmail") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :: S1 ('MetaSel ('Just "caDate") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritTime))))

data GerritChangeMessage Source #

Constructors

GerritChangeMessage
Fields mId :: Text mAuthor :: Maybe GerritAuthor mDate :: GerritTime mMessage :: Text

Instances

Instances details

Eq GerritChangeMessage Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritChangeMessage -> GerritChangeMessage -> Bool # (/=) :: GerritChangeMessage -> GerritChangeMessage -> Bool #
Show GerritChangeMessage Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritChangeMessage -> ShowS # show :: GerritChangeMessage -> String # showList :: [GerritChangeMessage] -> ShowS #
Generic GerritChangeMessage Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritChangeMessage :: Type -> Type # Methods from :: GerritChangeMessage -> Rep GerritChangeMessage x # to :: Rep GerritChangeMessage x -> GerritChangeMessage #
FromJSON GerritChangeMessage Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritChangeMessage # parseJSONList :: Value -> Parser [GerritChangeMessage] #
type Rep GerritChangeMessage Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritChangeMessage = D1 ('MetaData "GerritChangeMessage" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritChangeMessage" 'PrefixI 'True) ((S1 ('MetaSel ('Just "mId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :: S1 ('MetaSel ('Just "mAuthor") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe GerritAuthor))) :: (S1 ('MetaSel ('Just "mDate") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritTime) :*: S1 ('MetaSel ('Just "mMessage") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))))

data GerritChange Source #

Constructors

GerritChange

Fields

id :: Text
project :: Text
branch :: Text
hashtags :: [Text]
subject :: Text
status :: GerritChangeStatus
mergeable :: Maybe Bool
revisions :: Map Text (Maybe GerritRevision)
current_revision :: Maybe Text
number :: Int
labels :: Map Text GerritDetailedLabel
messages :: [GerritChangeMessage]
owner :: GerritAuthor
created :: GerritTime
updated :: GerritTime
submitted :: Maybe GerritTime
submitter :: Maybe GerritAuthor
topic :: Maybe Text
insertions :: Int
deletions :: Int
more_changes :: Maybe Bool

Instances

Instances details

Eq GerritChange Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritChange -> GerritChange -> Bool # (/=) :: GerritChange -> GerritChange -> Bool #
Show GerritChange Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritChange -> ShowS # show :: GerritChange -> String # showList :: [GerritChange] -> ShowS #
Generic GerritChange Source #
Instance details Defined in Gerrit.Data.Change Associated Types type Rep GerritChange :: Type -> Type # Methods from :: GerritChange -> Rep GerritChange x # to :: Rep GerritChange x -> GerritChange #
FromJSON GerritChange Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritChange # parseJSONList :: Value -> Parser [GerritChange] #
type Rep GerritChange Source #
Instance details Defined in Gerrit.Data.Change type Rep GerritChange = D1 ('MetaData "GerritChange" "Gerrit.Data.Change" "gerrit-0.1.3.0-3tqnnsRNuOt9OH1dNFdiSv" 'False) (C1 ('MetaCons "GerritChange" 'PrefixI 'True) ((((S1 ('MetaSel ('Just "id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :: S1 ('MetaSel ('Just "project") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :: (S1 ('MetaSel ('Just "branch") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :: (S1 ('MetaSel ('Just "hashtags") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Text]) :: S1 ('MetaSel ('Just "subject") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))) :: ((S1 ('MetaSel ('Just "status") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritChangeStatus) :: S1 ('MetaSel ('Just "mergeable") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))) :: (S1 ('MetaSel ('Just "revisions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map Text (Maybe GerritRevision))) :: (S1 ('MetaSel ('Just "current_revision") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :: S1 ('MetaSel ('Just "number") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int))))) :: (((S1 ('MetaSel ('Just "labels") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map Text GerritDetailedLabel)) :: S1 ('MetaSel ('Just "messages") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [GerritChangeMessage])) :: (S1 ('MetaSel ('Just "owner") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritAuthor) :: (S1 ('MetaSel ('Just "created") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritTime) :: S1 ('MetaSel ('Just "updated") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 GerritTime)))) :: ((S1 ('MetaSel ('Just "submitted") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe GerritTime)) :: (S1 ('MetaSel ('Just "submitter") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe GerritAuthor)) :: S1 ('MetaSel ('Just "topic") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :: (S1 ('MetaSel ('Just "insertions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :: (S1 ('MetaSel ('Just "deletions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :: S1 ('MetaSel ('Just "more_changes") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))))))))

newtype GerritTime Source #

Constructors

GerritTime
Fields unGerritTime :: UTCTime

Instances

Instances details

Eq GerritTime Source #
Instance details Defined in Gerrit.Data.Change Methods (==) :: GerritTime -> GerritTime -> Bool # (/=) :: GerritTime -> GerritTime -> Bool #
Show GerritTime Source #
Instance details Defined in Gerrit.Data.Change Methods showsPrec :: Int -> GerritTime -> ShowS # show :: GerritTime -> String # showList :: [GerritTime] -> ShowS #
FromJSON GerritTime Source #
Instance details Defined in Gerrit.Data.Change Methods parseJSON :: Value -> Parser GerritTime # parseJSONList :: Value -> Parser [GerritTime] #

changeQS :: Int -> [GerritQuery] -> Maybe Int -> Text Source #

Build the Query String for the changes endpoint >>> changeQS 10 [Project "software-factory/gerrit-haskell"] Nothing "q=project:software-factory/gerrit-haskell&n=10&o=MESSAGES&o=DETAILED_ACCOUNTS&o=DETAILED_LABELS&o=CURRENT_REVISION&o=CURRENT_FILES&o=CURRENT_COMMIT" >>> changeQS 10 [Project "software-factory/gerrit-haskell"] $ Just 100 "q=project:software-factory/gerrit-haskell&n=10&o=MESSAGES&o=DETAILED_ACCOUNTS&o=DETAILED_LABELS&o=CURRENT_REVISION&o=CURRENT_FILES&o=CURRENT_COMMIT&start=100"

queryText :: GerritQuery -> Text Source #

Convert a GerritQuery object to the search terms

defaultQueryChangeOptions :: Text Source #

hasLabel :: Text -> Int -> GerritChange -> Bool Source #

Check if a gerrit change as a label