Copyright	(c) Rob Stewart Heriot-Watt University 2019
License	BSD3
Maintainer	robstewart57@gmail.com
Stability	stable
Safe Haskell	None
Language	Haskell2010

GitLab.Types

Description

Synopsis

type GitLab m a = ReaderT GitLabState m a
data GitLabState = GitLabState {
- serverCfg :: GitLabServerConfig
- httpManager :: Manager
}
data GitLabServerConfig = GitLabServerConfig {
- url :: Text
- token :: Text
- timeout :: Int
- retries :: Int
}
defaultGitLabServer :: GitLabServerConfig
data Member = Member {
- member_id :: Int
- member_name :: Text
- member_username :: Text
- member_state :: Text
- member_avatar_uri :: Maybe Text
- member_web_url :: Maybe Text
- access_level :: Int
- expires_at :: Maybe Text
}
data Namespace = Namespace {
- namespace_id :: Int
- namespace_name :: Text
- namespace_path :: Text
- kind :: Text
- full_path :: Text
- parent_id :: Maybe Text
}
data Links = Links {
- self :: Text
- issues :: Text
- merge_requests :: Text
- repo_branches :: Text
- link_labels :: Text
- link_events :: Text
- members :: Text
}
data Owner = Ownwer {
- owner_id :: Int
- owner_name :: Text
- owner_username :: Text
- state :: Text
- owner_avatar_url :: Maybe Text
- owner_web_url :: Text
}
data Permissions = Permissions {
- project_access :: Maybe Object
- group_access :: Maybe Object
}
data Project = Project {
- project_id :: Int
- description :: Maybe Text
- project_name :: Text
- name_with_namespace :: Text
- project_path :: Text
- path_with_namespace :: Text
- project_created_at :: Text
- default_branch :: Maybe Text
- tag_list :: [Text]
- ssh_url_to_repo :: Text
- http_url_to_repo :: Text
- project_web_url :: Text
- readme_url :: Maybe Text
- project_avatar_url :: Maybe Text
- star_count :: Int
- forks_count :: Int
- last_activity_at :: Text
- namespace :: Namespace
- _links :: Maybe Links
- archived :: Maybe Bool
- visibility :: Maybe Text
- owner :: Maybe Owner
- resolve_outdated_diff_discussions :: Maybe Bool
- container_registry_enabled :: Maybe Bool
- issues_enabled :: Maybe Bool
- merge_requests_enabled :: Maybe Bool
- wiki_enabled :: Maybe Bool
- jobs_enabled :: Maybe Bool
- snippets_enabled :: Maybe Bool
- shared_runners_enabled :: Maybe Bool
- lfs_enabled :: Maybe Bool
- creator_id :: Maybe Int
- forked_from_project :: Maybe Project
- import_status :: Maybe String
- open_issues_count :: Maybe Int
- public_jobs :: Maybe Bool
- ci_config_path :: Maybe Text
- shared_with_groups :: Maybe [Object]
- only_allow_merge_if_pipeline_succeeds :: Maybe Bool
- request_access_enabled :: Maybe Bool
- only_allow_merge_if_all_discussions_are_resolved :: Maybe Bool
- printing_merge_request_link_enabled :: Maybe Bool
- merge_method :: Maybe Text
- permissions :: Maybe Permissions
- project_stats :: Maybe ProjectStats
}
data ProjectStats = ProjectStats {
- commit_count :: Int
- storage_size :: Int
- repository_size :: Int
- wiki_size :: Maybe Int
- lfs_objects_size :: Maybe Int
- job_artifacts_size :: Maybe Int
- packages_size :: Maybe Int
}
data User = User {
- user_id :: Int
- user_username :: Text
- user_name :: Text
- user_state :: Text
- user_avatar_uri :: Maybe Text
- user_web_url :: Maybe Text
}
data Milestone = Milestone {
- milestone_project_id :: Int
- milestone_description :: Text
- milestone_state :: Text
- due_date :: Maybe Text
- milestone_iid :: Int
- milestone_created_at :: Maybe Text
- milestone_title :: Text
- milestone_id :: Int
- milestone_updated_at :: Text
}
data TimeStats = TimeStats {
- time_estimate :: Int
- total_time_spent :: Int
- humane_time_estimate :: Maybe Int
- human_total_time_spent :: Maybe Int
}
data Issue = Issue {
- issue_state :: Text
- issue_description :: Text
- issue_author :: User
- milestone :: Maybe Milestone
- issue_project_id :: Int
- assignees :: Maybe [User]
- assignee :: Maybe User
- updated_at :: Text
- closed_at :: Maybe Text
- closed_by :: Maybe User
- issue_id :: Int
- issue_title :: Text
- issue_created_at :: Text
- iid :: Int
- issue_labels :: [Text]
- upvotes :: Int
- downvotes :: Int
- user_notes_count :: Int
- issue_due_date :: Maybe Text
- issue_web_url :: Text
- confidential :: Bool
- weight :: Maybe Text
- discussion_locked :: Maybe Bool
- time_stats :: TimeStats
}
data Pipeline = Pipeline {
- pipeline_id :: Int
- sha :: Text
- pipeline_ref :: Text
- pipeline_status :: Text
- pipeline_web_url :: Maybe Text
}
data Commit = Commit {
- commit_id :: Text
- short_id :: Text
- title :: Text
- author_name :: Text
- author_email :: Text
- authored_date :: Text
- committer_name :: Text
- committer_email :: Text
- committed_date :: Text
- commit_created_at :: Text
- message :: Text
- parent_ids :: Maybe [Text]
- last_pipeline :: Maybe Pipeline
- commit_stats :: Maybe CommitStats
- commit_status :: Maybe Text
}
data CommitStats = Stats {
- additions :: Int
- deletions :: Int
- total :: Int
}
data Diff = Diff {
- diff :: Text
- new_path :: Text
- old_path :: Text
- a_mode :: Maybe Text
- b_mode :: Maybe Text
- new_file :: Bool
- renamed_file :: Bool
- deleted_file :: Bool
}
data Repository = Repository {
- repository_id :: Text
- repository_name :: Text
- repository_type :: Text
- repository_path :: Text
- mode :: Text
}
data Job = Job {
- commit :: Commit
- coverage :: Maybe Text
- created_at :: Text
- started_at :: Text
- finished_at :: Text
- duration :: Double
- artifacts_expire_at :: Maybe Text
- id :: Int
- name :: Text
- pipeline :: Pipeline
- job_ref :: Text
- artifacts :: [Artifact]
- stage :: Text
- status :: Text
- tag :: Bool
- job_web_url :: Text
- user :: User
}
data Artifact = Artifact {
- file_type :: Text
- size :: Int
- filename :: Text
- file_format :: Maybe Text
}
data Group = Group {
- group_id :: Int
- group_name :: Text
- group_path :: Text
- group_description :: Text
- group_visibility :: Text
- group_lfs_enabled :: Bool
- group_avatar_url :: Maybe Text
- group_web_url :: Text
- group_request_access_enabled :: Bool
- group_full_name :: Text
- group_full_path :: Text
- group_file_template_project_id :: Maybe Int
- group_parent_id :: Maybe Int
}
data GroupShare = GroupShare {
- share_id :: Int
- share_project_id :: Int
- share_group_id :: Int
- share_group_access :: Int
- share_expires_at :: Maybe Text
}
data Branch = Branch {
- branch_name :: Text
- merged :: Bool
- protected :: Bool
- branch_default :: Bool
- developers_can_push :: Bool
- developers_can_merge :: Bool
- can_push :: Bool
- branch_commit :: Commit
}
data RepositoryFile = RepositoryFile {
- repository_file_file_name :: Text
- repository_file_file_path :: Text
- repository_file_size :: Int
- encoding :: Text
- content :: Text
- content_sha256 :: Text
- ref :: Text
- blob_id :: Text
- repository_file_commit_id :: Text
- last_commit_id :: Text
}
data MergeRequest = MergeRequest {
- merge_request_id :: Int
- merge_request_iid :: Int
- merge_request_project_id :: Int
- merge_request_title :: Text
- merge_request_description :: Text
- merge_request_state :: Text
- merge_request_merged_by :: Maybe User
- merge_request_merged_at :: Maybe Text
- merge_request_closed_by :: Maybe User
- merge_request_closed_at :: Maybe Text
- merge_request_created_at :: Text
- merge_request_updated_at :: Text
- merge_request_target_branch :: Text
- merge_request_source_branch :: Text
- merge_request_upvotes :: Int
- merge_request_downvotes :: Int
- merge_request_author :: User
- merge_request_assignee :: Maybe User
- merge_request_source_project_id :: Int
- merge_request_target_project_id :: Int
- merge_request_labels :: [Text]
- merge_request_work_in_progress :: Bool
- merge_request_milestone :: Maybe Milestone
- merge_request_merge_when_pipeline_succeeds :: Bool
- merge_request_merge_status :: Text
- merge_request_sha :: Text
- merge_request_merge_commit_sha :: Maybe Text
- merge_request_user_notes_count :: Int
- merge_request_discussion_locked :: Maybe Bool
- merge_request_should_remove_source_branch :: Maybe Bool
- merge_request_force_remove_source_branch :: Maybe Bool
- merge_request_web_url :: Text
- merge_request_time_stats :: TimeStats
- merge_request_squash :: Bool
- merge_request_approvals_before_merge :: Maybe Bool
}

Documentation

type GitLab m a = ReaderT GitLabState m a Source #

type synonym for all GitLab actions.

data GitLabState Source #

state used by GitLab actions, used internally.

Constructors

GitLabState
Fields serverCfg :: GitLabServerConfig httpManager :: Manager

data GitLabServerConfig Source #

configuration data specific to a GitLab server.

Constructors

GitLabServerConfig
Fields url :: Text token :: Text personal access token, see https://docs.gitlab.com/ee/user/profile/personal_access_tokens.html timeout :: Int milliseconds retries :: Int how many times to retry a HTTP request before giving up and returning an error.

defaultGitLabServer :: GitLabServerConfig Source #

default settings, the url and token values will need to be overwritten.

data Member Source #

member of a project.

Constructors

Member
Fields member_id :: Int member_name :: Text member_username :: Text member_state :: Text member_avatar_uri :: Maybe Text member_web_url :: Maybe Text access_level :: Int expires_at :: Maybe Text

Instances

Show Member Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Member -> ShowS # show :: Member -> String # showList :: [Member] -> ShowS #
Generic Member Source #
Instance details Defined in GitLab.Types Associated Types type Rep Member :: Type -> Type # Methods from :: Member -> Rep Member x # to :: Rep Member x -> Member #
FromJSON Member Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Member # parseJSONList :: Value -> Parser [Member] #
type Rep Member Source #
Instance details Defined in GitLab.Types type Rep Member = D1 (MetaData "Member" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Member" PrefixI True) (((S1 (MetaSel (Just "member_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "member_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "member_username") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "member_state") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: ((S1 (MetaSel (Just "member_avatar_uri") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: S1 (MetaSel (Just "member_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) :: (S1 (MetaSel (Just "access_level") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :*: S1 (MetaSel (Just "expires_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))))))

data Namespace Source #

namespaces.

Constructors

Namespace
Fields namespace_id :: Int namespace_name :: Text namespace_path :: Text kind :: Text full_path :: Text parent_id :: Maybe Text

Instances

Eq Namespace Source #
Instance details Defined in GitLab.Types Methods (==) :: Namespace -> Namespace -> Bool # (/=) :: Namespace -> Namespace -> Bool #
Show Namespace Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Namespace -> ShowS # show :: Namespace -> String # showList :: [Namespace] -> ShowS #
Generic Namespace Source #
Instance details Defined in GitLab.Types Associated Types type Rep Namespace :: Type -> Type # Methods from :: Namespace -> Rep Namespace x # to :: Rep Namespace x -> Namespace #
FromJSON Namespace Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Namespace # parseJSONList :: Value -> Parser [Namespace] #
type Rep Namespace Source #
Instance details Defined in GitLab.Types type Rep Namespace = D1 (MetaData "Namespace" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Namespace" PrefixI True) ((S1 (MetaSel (Just "namespace_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "namespace_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "namespace_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: (S1 (MetaSel (Just "kind") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "full_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :*: S1 (MetaSel (Just "parent_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))))))

data Links Source #

links.

Constructors

Links
Fields self :: Text issues :: Text merge_requests :: Text repo_branches :: Text link_labels :: Text link_events :: Text members :: Text

Instances

Eq Links Source #
Instance details Defined in GitLab.Types Methods (==) :: Links -> Links -> Bool # (/=) :: Links -> Links -> Bool #
Show Links Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Links -> ShowS # show :: Links -> String # showList :: [Links] -> ShowS #
Generic Links Source #
Instance details Defined in GitLab.Types Associated Types type Rep Links :: Type -> Type # Methods from :: Links -> Rep Links x # to :: Rep Links x -> Links #
FromJSON Links Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Links # parseJSONList :: Value -> Parser [Links] #
type Rep Links Source #
Instance details Defined in GitLab.Types type Rep Links = D1 (MetaData "Links" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Links" PrefixI True) ((S1 (MetaSel (Just "self") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "issues") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "merge_requests") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: ((S1 (MetaSel (Just "repo_branches") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "link_labels") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "link_events") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "members") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)))))

data Owner Source #

owners.

Constructors

Ownwer
Fields owner_id :: Int owner_name :: Text owner_username :: Text state :: Text owner_avatar_url :: Maybe Text owner_web_url :: Text

Instances

Eq Owner Source #
Instance details Defined in GitLab.Types Methods (==) :: Owner -> Owner -> Bool # (/=) :: Owner -> Owner -> Bool #
Show Owner Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Owner -> ShowS # show :: Owner -> String # showList :: [Owner] -> ShowS #
Generic Owner Source #
Instance details Defined in GitLab.Types Associated Types type Rep Owner :: Type -> Type # Methods from :: Owner -> Rep Owner x # to :: Rep Owner x -> Owner #
FromJSON Owner Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Owner # parseJSONList :: Value -> Parser [Owner] #
type Rep Owner Source #
Instance details Defined in GitLab.Types type Rep Owner = D1 (MetaData "Owner" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Ownwer" PrefixI True) ((S1 (MetaSel (Just "owner_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "owner_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "owner_username") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: (S1 (MetaSel (Just "state") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "owner_avatar_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :*: S1 (MetaSel (Just "owner_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)))))

data Permissions Source #

permissions.

Constructors

Permissions
Fields project_access :: Maybe Object group_access :: Maybe Object

Instances

Eq Permissions Source #
Instance details Defined in GitLab.Types Methods (==) :: Permissions -> Permissions -> Bool # (/=) :: Permissions -> Permissions -> Bool #
Show Permissions Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Permissions -> ShowS # show :: Permissions -> String # showList :: [Permissions] -> ShowS #
Generic Permissions Source #
Instance details Defined in GitLab.Types Associated Types type Rep Permissions :: Type -> Type # Methods from :: Permissions -> Rep Permissions x # to :: Rep Permissions x -> Permissions #
FromJSON Permissions Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Permissions # parseJSONList :: Value -> Parser [Permissions] #
type Rep Permissions Source #
Instance details Defined in GitLab.Types type Rep Permissions = D1 (MetaData "Permissions" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Permissions" PrefixI True) (S1 (MetaSel (Just "project_access") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Object)) :*: S1 (MetaSel (Just "group_access") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Object))))

data Project Source #

projects.

Constructors

Project

Fields

project_id :: Int
description :: Maybe Text
project_name :: Text
name_with_namespace :: Text
project_path :: Text
path_with_namespace :: Text
project_created_at :: Text
default_branch :: Maybe Text
tag_list :: [Text]
ssh_url_to_repo :: Text
http_url_to_repo :: Text
project_web_url :: Text
readme_url :: Maybe Text
project_avatar_url :: Maybe Text
star_count :: Int
forks_count :: Int
last_activity_at :: Text
namespace :: Namespace
_links :: Maybe Links
archived :: Maybe Bool
visibility :: Maybe Text
owner :: Maybe Owner
resolve_outdated_diff_discussions :: Maybe Bool
container_registry_enabled :: Maybe Bool
issues_enabled :: Maybe Bool
merge_requests_enabled :: Maybe Bool
wiki_enabled :: Maybe Bool
jobs_enabled :: Maybe Bool
snippets_enabled :: Maybe Bool
shared_runners_enabled :: Maybe Bool
lfs_enabled :: Maybe Bool
creator_id :: Maybe Int
forked_from_project :: Maybe Project
import_status :: Maybe String
open_issues_count :: Maybe Int
public_jobs :: Maybe Bool
ci_config_path :: Maybe Text
shared_with_groups :: Maybe [Object]
only_allow_merge_if_pipeline_succeeds :: Maybe Bool
request_access_enabled :: Maybe Bool
only_allow_merge_if_all_discussions_are_resolved :: Maybe Bool
printing_merge_request_link_enabled :: Maybe Bool
merge_method :: Maybe Text
permissions :: Maybe Permissions
project_stats :: Maybe ProjectStats

Instances

Eq Project Source #
Instance details Defined in GitLab.Types Methods (==) :: Project -> Project -> Bool # (/=) :: Project -> Project -> Bool #
Show Project Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Project -> ShowS # show :: Project -> String # showList :: [Project] -> ShowS #
Generic Project Source #
Instance details Defined in GitLab.Types Associated Types type Rep Project :: Type -> Type # Methods from :: Project -> Rep Project x # to :: Rep Project x -> Project #
FromJSON Project Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Project # parseJSONList :: Value -> Parser [Project] #
type Rep Project Source #
Instance details Defined in GitLab.Types type Rep Project = D1 (MetaData "Project" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Project" PrefixI True) (((((S1 (MetaSel (Just "project_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "description") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) :: (S1 (MetaSel (Just "project_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "name_with_namespace") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "project_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)))) :: ((S1 (MetaSel (Just "path_with_namespace") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "project_created_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "default_branch") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))) :: (S1 (MetaSel (Just "tag_list") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Text]) :: (S1 (MetaSel (Just "ssh_url_to_repo") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "http_url_to_repo") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))))) :: (((S1 (MetaSel (Just "project_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "readme_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) :: (S1 (MetaSel (Just "project_avatar_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: (S1 (MetaSel (Just "star_count") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "forks_count") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)))) :: ((S1 (MetaSel (Just "last_activity_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "namespace") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Namespace) :: S1 (MetaSel (Just "_links") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Links)))) :: (S1 (MetaSel (Just "archived") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: (S1 (MetaSel (Just "visibility") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: S1 (MetaSel (Just "owner") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Owner))))))) :: ((((S1 (MetaSel (Just "resolve_outdated_diff_discussions") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: S1 (MetaSel (Just "container_registry_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool))) :: (S1 (MetaSel (Just "issues_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: (S1 (MetaSel (Just "merge_requests_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: S1 (MetaSel (Just "wiki_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool))))) :: ((S1 (MetaSel (Just "jobs_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: (S1 (MetaSel (Just "snippets_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: S1 (MetaSel (Just "shared_runners_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)))) :: (S1 (MetaSel (Just "lfs_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: (S1 (MetaSel (Just "creator_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int)) :: S1 (MetaSel (Just "forked_from_project") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Project)))))) :: (((S1 (MetaSel (Just "import_status") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String)) :: (S1 (MetaSel (Just "open_issues_count") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int)) :: S1 (MetaSel (Just "public_jobs") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)))) :: (S1 (MetaSel (Just "ci_config_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: (S1 (MetaSel (Just "shared_with_groups") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe [Object])) :: S1 (MetaSel (Just "only_allow_merge_if_pipeline_succeeds") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool))))) :: ((S1 (MetaSel (Just "request_access_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: (S1 (MetaSel (Just "only_allow_merge_if_all_discussions_are_resolved") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: S1 (MetaSel (Just "printing_merge_request_link_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)))) :: (S1 (MetaSel (Just "merge_method") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: (S1 (MetaSel (Just "permissions") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Permissions)) :: S1 (MetaSel (Just "project_stats") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe ProjectStats)))))))))

data ProjectStats Source #

Constructors

ProjectStats
Fields commit_count :: Int storage_size :: Int repository_size :: Int wiki_size :: Maybe Int lfs_objects_size :: Maybe Int job_artifacts_size :: Maybe Int packages_size :: Maybe Int

Instances

Eq ProjectStats Source #
Instance details Defined in GitLab.Types Methods (==) :: ProjectStats -> ProjectStats -> Bool # (/=) :: ProjectStats -> ProjectStats -> Bool #
Show ProjectStats Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> ProjectStats -> ShowS # show :: ProjectStats -> String # showList :: [ProjectStats] -> ShowS #
Generic ProjectStats Source #
Instance details Defined in GitLab.Types Associated Types type Rep ProjectStats :: Type -> Type # Methods from :: ProjectStats -> Rep ProjectStats x # to :: Rep ProjectStats x -> ProjectStats #
FromJSON ProjectStats Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser ProjectStats # parseJSONList :: Value -> Parser [ProjectStats] #
type Rep ProjectStats Source #
Instance details Defined in GitLab.Types type Rep ProjectStats = D1 (MetaData "ProjectStats" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "ProjectStats" PrefixI True) ((S1 (MetaSel (Just "commit_count") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "storage_size") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "repository_size") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int))) :: ((S1 (MetaSel (Just "wiki_size") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int)) :: S1 (MetaSel (Just "lfs_objects_size") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int))) :: (S1 (MetaSel (Just "job_artifacts_size") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int)) :: S1 (MetaSel (Just "packages_size") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int))))))

data User Source #

registered users.

Constructors

User
Fields user_id :: Int user_username :: Text user_name :: Text user_state :: Text user_avatar_uri :: Maybe Text user_web_url :: Maybe Text

Instances

Eq User Source #
Instance details Defined in GitLab.Types Methods (==) :: User -> User -> Bool # (/=) :: User -> User -> Bool #
Show User Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> User -> ShowS # show :: User -> String # showList :: [User] -> ShowS #
Generic User Source #
Instance details Defined in GitLab.Types Associated Types type Rep User :: Type -> Type # Methods from :: User -> Rep User x # to :: Rep User x -> User #
FromJSON User Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser User # parseJSONList :: Value -> Parser [User] #
type Rep User Source #
Instance details Defined in GitLab.Types type Rep User = D1 (MetaData "User" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "User" PrefixI True) ((S1 (MetaSel (Just "user_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "user_username") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "user_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: (S1 (MetaSel (Just "user_state") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "user_avatar_uri") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :*: S1 (MetaSel (Just "user_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))))))

data Milestone Source #

project milestones.

Constructors

Milestone
Fields milestone_project_id :: Int milestone_description :: Text milestone_state :: Text due_date :: Maybe Text milestone_iid :: Int milestone_created_at :: Maybe Text milestone_title :: Text milestone_id :: Int milestone_updated_at :: Text

Instances

Eq Milestone Source #
Instance details Defined in GitLab.Types Methods (==) :: Milestone -> Milestone -> Bool # (/=) :: Milestone -> Milestone -> Bool #
Show Milestone Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Milestone -> ShowS # show :: Milestone -> String # showList :: [Milestone] -> ShowS #
Generic Milestone Source #
Instance details Defined in GitLab.Types Associated Types type Rep Milestone :: Type -> Type # Methods from :: Milestone -> Rep Milestone x # to :: Rep Milestone x -> Milestone #
FromJSON Milestone Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Milestone # parseJSONList :: Value -> Parser [Milestone] #
type Rep Milestone Source #
Instance details Defined in GitLab.Types type Rep Milestone = D1 (MetaData "Milestone" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Milestone" PrefixI True) (((S1 (MetaSel (Just "milestone_project_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "milestone_description") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "milestone_state") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "due_date") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))) :: ((S1 (MetaSel (Just "milestone_iid") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "milestone_created_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) :: (S1 (MetaSel (Just "milestone_title") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "milestone_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "milestone_updated_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))))))

data TimeStats Source #

time stats.

Constructors

TimeStats
Fields time_estimate :: Int total_time_spent :: Int humane_time_estimate :: Maybe Int human_total_time_spent :: Maybe Int

Instances

Eq TimeStats Source #
Instance details Defined in GitLab.Types Methods (==) :: TimeStats -> TimeStats -> Bool # (/=) :: TimeStats -> TimeStats -> Bool #
Show TimeStats Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> TimeStats -> ShowS # show :: TimeStats -> String # showList :: [TimeStats] -> ShowS #
Generic TimeStats Source #
Instance details Defined in GitLab.Types Associated Types type Rep TimeStats :: Type -> Type # Methods from :: TimeStats -> Rep TimeStats x # to :: Rep TimeStats x -> TimeStats #
FromJSON TimeStats Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser TimeStats # parseJSONList :: Value -> Parser [TimeStats] #
type Rep TimeStats Source #
Instance details Defined in GitLab.Types type Rep TimeStats = D1 (MetaData "TimeStats" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "TimeStats" PrefixI True) ((S1 (MetaSel (Just "time_estimate") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "total_time_spent") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)) :: (S1 (MetaSel (Just "humane_time_estimate") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int)) :*: S1 (MetaSel (Just "human_total_time_spent") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int)))))

data Issue Source #

project issues.

Constructors

Issue

Fields

issue_state :: Text
issue_description :: Text
issue_author :: User
milestone :: Maybe Milestone
issue_project_id :: Int
assignees :: Maybe [User]
assignee :: Maybe User
updated_at :: Text
closed_at :: Maybe Text
closed_by :: Maybe User
issue_id :: Int
issue_title :: Text
issue_created_at :: Text
iid :: Int
issue_labels :: [Text]
upvotes :: Int
downvotes :: Int
user_notes_count :: Int
issue_due_date :: Maybe Text
issue_web_url :: Text
confidential :: Bool
weight :: Maybe Text
discussion_locked :: Maybe Bool
time_stats :: TimeStats

Instances

Eq Issue Source #
Instance details Defined in GitLab.Types Methods (==) :: Issue -> Issue -> Bool # (/=) :: Issue -> Issue -> Bool #
Show Issue Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Issue -> ShowS # show :: Issue -> String # showList :: [Issue] -> ShowS #
Generic Issue Source #
Instance details Defined in GitLab.Types Associated Types type Rep Issue :: Type -> Type # Methods from :: Issue -> Rep Issue x # to :: Rep Issue x -> Issue #
FromJSON Issue Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Issue # parseJSONList :: Value -> Parser [Issue] #
type Rep Issue Source #
Instance details Defined in GitLab.Types type Rep Issue = D1 (MetaData "Issue" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Issue" PrefixI True) ((((S1 (MetaSel (Just "issue_state") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "issue_description") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "issue_author") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 User))) :: (S1 (MetaSel (Just "milestone") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Milestone)) :: (S1 (MetaSel (Just "issue_project_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "assignees") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe [User]))))) :: ((S1 (MetaSel (Just "assignee") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe User)) :: (S1 (MetaSel (Just "updated_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "closed_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))) :: (S1 (MetaSel (Just "closed_by") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe User)) :: (S1 (MetaSel (Just "issue_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "issue_title") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))))) :: (((S1 (MetaSel (Just "issue_created_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "iid") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "issue_labels") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Text]))) :: (S1 (MetaSel (Just "upvotes") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "downvotes") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "user_notes_count") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)))) :: ((S1 (MetaSel (Just "issue_due_date") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: (S1 (MetaSel (Just "issue_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "confidential") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool))) :: (S1 (MetaSel (Just "weight") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: (S1 (MetaSel (Just "discussion_locked") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 (MetaSel (Just "time_stats") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TimeStats)))))))

data Pipeline Source #

project pipelines

Constructors

Pipeline
Fields pipeline_id :: Int sha :: Text pipeline_ref :: Text pipeline_status :: Text pipeline_web_url :: Maybe Text

Instances

Show Pipeline Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Pipeline -> ShowS # show :: Pipeline -> String # showList :: [Pipeline] -> ShowS #
Generic Pipeline Source #
Instance details Defined in GitLab.Types Associated Types type Rep Pipeline :: Type -> Type # Methods from :: Pipeline -> Rep Pipeline x # to :: Rep Pipeline x -> Pipeline #
FromJSON Pipeline Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Pipeline # parseJSONList :: Value -> Parser [Pipeline] #
type Rep Pipeline Source #
Instance details Defined in GitLab.Types type Rep Pipeline = D1 (MetaData "Pipeline" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Pipeline" PrefixI True) ((S1 (MetaSel (Just "pipeline_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "sha") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "pipeline_ref") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "pipeline_status") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "pipeline_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))))))

data Commit Source #

code commits.

Constructors

Commit
Fields commit_id :: Text short_id :: Text title :: Text author_name :: Text author_email :: Text authored_date :: Text committer_name :: Text committer_email :: Text committed_date :: Text commit_created_at :: Text message :: Text parent_ids :: Maybe [Text] last_pipeline :: Maybe Pipeline commit_stats :: Maybe CommitStats commit_status :: Maybe Text

Instances

Show Commit Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Commit -> ShowS # show :: Commit -> String # showList :: [Commit] -> ShowS #
Generic Commit Source #
Instance details Defined in GitLab.Types Associated Types type Rep Commit :: Type -> Type # Methods from :: Commit -> Rep Commit x # to :: Rep Commit x -> Commit #
FromJSON Commit Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Commit # parseJSONList :: Value -> Parser [Commit] #
type Rep Commit Source #
Instance details Defined in GitLab.Types type Rep Commit = D1 (MetaData "Commit" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Commit" PrefixI True) (((S1 (MetaSel (Just "commit_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "short_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "title") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: ((S1 (MetaSel (Just "author_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "author_email") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "authored_date") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "committer_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)))) :: (((S1 (MetaSel (Just "committer_email") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "committed_date") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "commit_created_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "message") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: ((S1 (MetaSel (Just "parent_ids") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe [Text])) :: S1 (MetaSel (Just "last_pipeline") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Pipeline))) :: (S1 (MetaSel (Just "commit_stats") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe CommitStats)) :: S1 (MetaSel (Just "commit_status") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))))))

data CommitStats Source #

commit stats.

Constructors

Stats
Fields additions :: Int deletions :: Int total :: Int

Instances

Show CommitStats Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> CommitStats -> ShowS # show :: CommitStats -> String # showList :: [CommitStats] -> ShowS #
Generic CommitStats Source #
Instance details Defined in GitLab.Types Associated Types type Rep CommitStats :: Type -> Type # Methods from :: CommitStats -> Rep CommitStats x # to :: Rep CommitStats x -> CommitStats #
FromJSON CommitStats Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser CommitStats # parseJSONList :: Value -> Parser [CommitStats] #
type Rep CommitStats Source #
Instance details Defined in GitLab.Types type Rep CommitStats = D1 (MetaData "CommitStats" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Stats" PrefixI True) (S1 (MetaSel (Just "additions") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "deletions") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "total") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int))))

data Diff Source #

Constructors

Diff
Fields diff :: Text new_path :: Text old_path :: Text a_mode :: Maybe Text b_mode :: Maybe Text new_file :: Bool renamed_file :: Bool deleted_file :: Bool

Instances

Show Diff Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Diff -> ShowS # show :: Diff -> String # showList :: [Diff] -> ShowS #
Generic Diff Source #
Instance details Defined in GitLab.Types Associated Types type Rep Diff :: Type -> Type # Methods from :: Diff -> Rep Diff x # to :: Rep Diff x -> Diff #
FromJSON Diff Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Diff # parseJSONList :: Value -> Parser [Diff] #
type Rep Diff Source #
Instance details Defined in GitLab.Types type Rep Diff = D1 (MetaData "Diff" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Diff" PrefixI True) (((S1 (MetaSel (Just "diff") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "new_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "old_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "a_mode") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))) :: ((S1 (MetaSel (Just "b_mode") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: S1 (MetaSel (Just "new_file") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool)) :: (S1 (MetaSel (Just "renamed_file") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool) :*: S1 (MetaSel (Just "deleted_file") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool)))))

data Repository Source #

repositories.

Constructors

Repository
Fields repository_id :: Text repository_name :: Text repository_type :: Text repository_path :: Text mode :: Text

Instances

Show Repository Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Repository -> ShowS # show :: Repository -> String # showList :: [Repository] -> ShowS #
Generic Repository Source #
Instance details Defined in GitLab.Types Associated Types type Rep Repository :: Type -> Type # Methods from :: Repository -> Rep Repository x # to :: Rep Repository x -> Repository #
FromJSON Repository Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Repository # parseJSONList :: Value -> Parser [Repository] #
type Rep Repository Source #
Instance details Defined in GitLab.Types type Rep Repository = D1 (MetaData "Repository" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Repository" PrefixI True) ((S1 (MetaSel (Just "repository_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "repository_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "repository_type") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "repository_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "mode") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)))))

data Job Source #

jobs.

Constructors

Job
Fields commit :: Commit coverage :: Maybe Text created_at :: Text started_at :: Text finished_at :: Text duration :: Double artifacts_expire_at :: Maybe Text id :: Int name :: Text pipeline :: Pipeline job_ref :: Text artifacts :: [Artifact] stage :: Text status :: Text tag :: Bool job_web_url :: Text user :: User

Instances

Show Job Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Job -> ShowS # show :: Job -> String # showList :: [Job] -> ShowS #
Generic Job Source #
Instance details Defined in GitLab.Types Associated Types type Rep Job :: Type -> Type # Methods from :: Job -> Rep Job x # to :: Rep Job x -> Job #
FromJSON Job Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Job # parseJSONList :: Value -> Parser [Job] #
type Rep Job Source #
Instance details Defined in GitLab.Types type Rep Job = D1 (MetaData "Job" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Job" PrefixI True) ((((S1 (MetaSel (Just "commit") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Commit) :: S1 (MetaSel (Just "coverage") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) :: (S1 (MetaSel (Just "created_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "started_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: ((S1 (MetaSel (Just "finished_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "duration") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Double)) :: (S1 (MetaSel (Just "artifacts_expire_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: S1 (MetaSel (Just "id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)))) :: (((S1 (MetaSel (Just "name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "pipeline") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Pipeline)) :: (S1 (MetaSel (Just "job_ref") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "artifacts") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Artifact]))) :: ((S1 (MetaSel (Just "stage") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "status") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "tag") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool) :: (S1 (MetaSel (Just "job_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "user") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 User)))))))

data Artifact Source #

artifacts.

Constructors

Artifact
Fields file_type :: Text size :: Int filename :: Text file_format :: Maybe Text

Instances

Show Artifact Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Artifact -> ShowS # show :: Artifact -> String # showList :: [Artifact] -> ShowS #
Generic Artifact Source #
Instance details Defined in GitLab.Types Associated Types type Rep Artifact :: Type -> Type # Methods from :: Artifact -> Rep Artifact x # to :: Rep Artifact x -> Artifact #
FromJSON Artifact Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Artifact # parseJSONList :: Value -> Parser [Artifact] #
type Rep Artifact Source #
Instance details Defined in GitLab.Types type Rep Artifact = D1 (MetaData "Artifact" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Artifact" PrefixI True) ((S1 (MetaSel (Just "file_type") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "size") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)) :: (S1 (MetaSel (Just "filename") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :*: S1 (MetaSel (Just "file_format") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))))

data Group Source #

groups.

Constructors

Group
Fields group_id :: Int group_name :: Text group_path :: Text group_description :: Text group_visibility :: Text group_lfs_enabled :: Bool group_avatar_url :: Maybe Text group_web_url :: Text group_request_access_enabled :: Bool group_full_name :: Text group_full_path :: Text group_file_template_project_id :: Maybe Int group_parent_id :: Maybe Int

Instances

Show Group Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Group -> ShowS # show :: Group -> String # showList :: [Group] -> ShowS #
Generic Group Source #
Instance details Defined in GitLab.Types Associated Types type Rep Group :: Type -> Type # Methods from :: Group -> Rep Group x # to :: Rep Group x -> Group #
FromJSON Group Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Group # parseJSONList :: Value -> Parser [Group] #
type Rep Group Source #
Instance details Defined in GitLab.Types type Rep Group = D1 (MetaData "Group" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Group" PrefixI True) (((S1 (MetaSel (Just "group_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "group_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "group_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: (S1 (MetaSel (Just "group_description") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "group_visibility") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "group_lfs_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool)))) :: ((S1 (MetaSel (Just "group_avatar_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: (S1 (MetaSel (Just "group_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "group_request_access_enabled") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool))) :: ((S1 (MetaSel (Just "group_full_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "group_full_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "group_file_template_project_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int)) :: S1 (MetaSel (Just "group_parent_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int)))))))

data GroupShare Source #

response to sharing a project with a group.

Constructors

GroupShare
Fields share_id :: Int share_project_id :: Int share_group_id :: Int share_group_access :: Int share_expires_at :: Maybe Text

Instances

Show GroupShare Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> GroupShare -> ShowS # show :: GroupShare -> String # showList :: [GroupShare] -> ShowS #
Generic GroupShare Source #
Instance details Defined in GitLab.Types Associated Types type Rep GroupShare :: Type -> Type # Methods from :: GroupShare -> Rep GroupShare x # to :: Rep GroupShare x -> GroupShare #
FromJSON GroupShare Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser GroupShare # parseJSONList :: Value -> Parser [GroupShare] #
type Rep GroupShare Source #
Instance details Defined in GitLab.Types type Rep GroupShare = D1 (MetaData "GroupShare" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "GroupShare" PrefixI True) ((S1 (MetaSel (Just "share_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "share_project_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)) :: (S1 (MetaSel (Just "share_group_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "share_group_access") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "share_expires_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))))))

data Branch Source #

code branches.

Constructors

Branch
Fields branch_name :: Text merged :: Bool protected :: Bool branch_default :: Bool developers_can_push :: Bool developers_can_merge :: Bool can_push :: Bool branch_commit :: Commit

Instances

Show Branch Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> Branch -> ShowS # show :: Branch -> String # showList :: [Branch] -> ShowS #
Generic Branch Source #
Instance details Defined in GitLab.Types Associated Types type Rep Branch :: Type -> Type # Methods from :: Branch -> Rep Branch x # to :: Rep Branch x -> Branch #
FromJSON Branch Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser Branch # parseJSONList :: Value -> Parser [Branch] #
type Rep Branch Source #
Instance details Defined in GitLab.Types type Rep Branch = D1 (MetaData "Branch" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "Branch" PrefixI True) (((S1 (MetaSel (Just "branch_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "merged") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool)) :: (S1 (MetaSel (Just "protected") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool) :: S1 (MetaSel (Just "branch_default") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool))) :: ((S1 (MetaSel (Just "developers_can_push") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool) :: S1 (MetaSel (Just "developers_can_merge") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool)) :: (S1 (MetaSel (Just "can_push") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool) :*: S1 (MetaSel (Just "branch_commit") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Commit)))))

data RepositoryFile Source #

files in a repository.

Constructors

RepositoryFile
Fields repository_file_file_name :: Text repository_file_file_path :: Text repository_file_size :: Int encoding :: Text content :: Text content_sha256 :: Text ref :: Text blob_id :: Text repository_file_commit_id :: Text last_commit_id :: Text

Instances

Show RepositoryFile Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> RepositoryFile -> ShowS # show :: RepositoryFile -> String # showList :: [RepositoryFile] -> ShowS #
Generic RepositoryFile Source #
Instance details Defined in GitLab.Types Associated Types type Rep RepositoryFile :: Type -> Type # Methods from :: RepositoryFile -> Rep RepositoryFile x # to :: Rep RepositoryFile x -> RepositoryFile #
FromJSON RepositoryFile Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser RepositoryFile # parseJSONList :: Value -> Parser [RepositoryFile] #
type Rep RepositoryFile Source #
Instance details Defined in GitLab.Types type Rep RepositoryFile = D1 (MetaData "RepositoryFile" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "RepositoryFile" PrefixI True) (((S1 (MetaSel (Just "repository_file_file_name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "repository_file_file_path") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "repository_file_size") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "encoding") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "content") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)))) :: ((S1 (MetaSel (Just "content_sha256") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "ref") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "blob_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "repository_file_commit_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :*: S1 (MetaSel (Just "last_commit_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))))))

data MergeRequest Source #

project merge requests.

Constructors

MergeRequest

Fields

merge_request_id :: Int
merge_request_iid :: Int
merge_request_project_id :: Int
merge_request_title :: Text
merge_request_description :: Text
merge_request_state :: Text
merge_request_merged_by :: Maybe User
merge_request_merged_at :: Maybe Text
merge_request_closed_by :: Maybe User
merge_request_closed_at :: Maybe Text
merge_request_created_at :: Text
merge_request_updated_at :: Text
merge_request_target_branch :: Text
merge_request_source_branch :: Text
merge_request_upvotes :: Int
merge_request_downvotes :: Int
merge_request_author :: User
merge_request_assignee :: Maybe User
merge_request_source_project_id :: Int
merge_request_target_project_id :: Int
merge_request_labels :: [Text]
merge_request_work_in_progress :: Bool
merge_request_milestone :: Maybe Milestone
merge_request_merge_when_pipeline_succeeds :: Bool
merge_request_merge_status :: Text
merge_request_sha :: Text
merge_request_merge_commit_sha :: Maybe Text
merge_request_user_notes_count :: Int
merge_request_discussion_locked :: Maybe Bool
merge_request_should_remove_source_branch :: Maybe Bool
merge_request_force_remove_source_branch :: Maybe Bool
merge_request_web_url :: Text
merge_request_time_stats :: TimeStats
merge_request_squash :: Bool
merge_request_approvals_before_merge :: Maybe Bool

Instances

Show MergeRequest Source #
Instance details Defined in GitLab.Types Methods showsPrec :: Int -> MergeRequest -> ShowS # show :: MergeRequest -> String # showList :: [MergeRequest] -> ShowS #
Generic MergeRequest Source #
Instance details Defined in GitLab.Types Associated Types type Rep MergeRequest :: Type -> Type # Methods from :: MergeRequest -> Rep MergeRequest x # to :: Rep MergeRequest x -> MergeRequest #
FromJSON MergeRequest Source #
Instance details Defined in GitLab.Types Methods parseJSON :: Value -> Parser MergeRequest # parseJSONList :: Value -> Parser [MergeRequest] #
type Rep MergeRequest Source #
Instance details Defined in GitLab.Types type Rep MergeRequest = D1 (MetaData "MergeRequest" "GitLab.Types" "gitlab-haskell-0.1.1-8Y2OGznZ1xY34zwjYClttK" False) (C1 (MetaCons "MergeRequest" PrefixI True) (((((S1 (MetaSel (Just "merge_request_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "merge_request_iid") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)) :: (S1 (MetaSel (Just "merge_request_project_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "merge_request_title") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: ((S1 (MetaSel (Just "merge_request_description") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "merge_request_state") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "merge_request_merged_by") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe User)) :: S1 (MetaSel (Just "merge_request_merged_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))))) :: (((S1 (MetaSel (Just "merge_request_closed_by") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe User)) :: S1 (MetaSel (Just "merge_request_closed_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) :: (S1 (MetaSel (Just "merge_request_created_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "merge_request_updated_at") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))) :: ((S1 (MetaSel (Just "merge_request_target_branch") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "merge_request_source_branch") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "merge_request_upvotes") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "merge_request_downvotes") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "merge_request_author") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 User)))))) :: ((((S1 (MetaSel (Just "merge_request_assignee") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe User)) :: S1 (MetaSel (Just "merge_request_source_project_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)) :: (S1 (MetaSel (Just "merge_request_target_project_id") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "merge_request_labels") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Text]))) :: ((S1 (MetaSel (Just "merge_request_work_in_progress") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool) :: S1 (MetaSel (Just "merge_request_milestone") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Milestone))) :: (S1 (MetaSel (Just "merge_request_merge_when_pipeline_succeeds") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool) :: (S1 (MetaSel (Just "merge_request_merge_status") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "merge_request_sha") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text))))) :: (((S1 (MetaSel (Just "merge_request_merge_commit_sha") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: S1 (MetaSel (Just "merge_request_user_notes_count") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)) :: (S1 (MetaSel (Just "merge_request_discussion_locked") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: S1 (MetaSel (Just "merge_request_should_remove_source_branch") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)))) :: ((S1 (MetaSel (Just "merge_request_force_remove_source_branch") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)) :: S1 (MetaSel (Just "merge_request_web_url") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) :: (S1 (MetaSel (Just "merge_request_time_stats") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TimeStats) :: (S1 (MetaSel (Just "merge_request_squash") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool) :: S1 (MetaSel (Just "merge_request_approvals_before_merge") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Bool)))))))))