Web.Hook.GitLab

Synopsis

• type CommitID = Text
• type Url = Text
• data Author = Author {
  • authorName :: Text
  • authorEmail :: Text
  }
• data User = User {
  • userName :: Text
  • userUsername :: Text
  • userAvatar :: Url
  }
• data Commit = Commit {
  • commitId :: CommitID
  • commitMessage :: Text
  • commitTimestamp :: Text
  • commitUrl :: Url
  • commitAuthor :: Author
  }
• data MergeEndpoint = MergeEndpoint {
  • mepName :: Text
  • mepSshUrl :: Url
  • mepHttpurl :: Url
  • mepVisibility :: Int
  • mepNamespace :: Text
  }
• data Repository = Repository {
  • repoName :: Text
  • repoUrl :: Url
  • repoDesc :: Text
  • repoHomepage :: Url
  • repoGitHttpUrl :: Url
  • repoGitSshUrl :: Url
  • repoVisibility :: Int
  }
• data Issue = Issue {
  • issueInternalId :: Int
  • issueTitle :: Text
  • issueAssigneeId :: Int
  • issueAuthorId :: Int
  • issueProjectId :: Int
  • issueCreatedAt :: Text
  • issueUpdatedAt :: Text
  • issuePosition :: Int
  • issueBranch :: Maybe Text
  • issueDescription :: Text
  • issueMilestoneId :: Maybe Int
  • issueState :: Text
  • issueId :: Int
  • issueUrl :: Url
  }
• data MergeRequest = MergeRequest {
  • mrInternalId :: Int
  • mrTargetBranch :: Text
  • mrSourceBranch :: Text
  • mrSourceProjectId :: Int
  • mrAuthorId :: Int
  • mrAssigneeId :: Maybe Int
  • mrTitle :: Text
  • mrCreatedAt :: Text
  • mrUpdatedAt :: Text
  • mrMilestoneId :: Maybe Int
  • mrState :: Text
  • mrMergeStatus :: Text
  • mrTargetProjectId :: Int
  • mrId :: Int
  • mrDescription :: Text
  • mrSource :: MergeEndpoint
  • mrTarget :: MergeEndpoint
  • mrLastCommit :: Commit
  • mrUrl :: Url
  }
• data Push = Push {
  • pushBefore :: CommitID
  • pushAfter :: CommitID
  • pushRef :: Text
  • pushUserId :: Int
  • pushUserName :: Text
  • pushUserEmail :: Text
  • pushProjectId :: Int
  • pushRepository :: Repository
  • pushCommits :: [Commit]
  • pushCommitsTotal :: Int
  }
• data IssueEvent = IssueEvent {
  • ieUser :: User
  • ieIssue :: Issue
  • ieAction :: Text
  }
• data MergeRequestEvent = MergeRequestEvent {
  • mreUser :: User
  • mreRequest :: MergeRequest
  • mreAction :: Text
  }
• data Event
  • = EventPush Push
  • | EventPushTag Push
  • | EventIssue IssueEvent
  • | EventMergeRequest MergeRequestEvent
• parse :: ByteString -> Either String Event

Documentation