github 0.29 → 0.30
raw patch · 22 files changed
+406/−95 lines, 22 filesdep +timedep −semigroupsdep −time-compatdep ~basedep ~containersdep ~http-clientPVP ok
version bump matches the API change (PVP)
Dependencies added: time
Dependencies removed: semigroups, time-compat
Dependency ranges changed: base, containers, http-client
API changes (from Hackage documentation)
- GitHub.Internal.Prelude: (!!) :: [a] -> Int -> a
- GitHub.Internal.Prelude: ($!) :: forall (r :: RuntimeRep) a (b :: TYPE r). (a -> b) -> a -> b
- GitHub.Internal.Prelude: ($) :: forall (r :: RuntimeRep) a (b :: TYPE r). (a -> b) -> a -> b
- GitHub.Internal.Prelude: (&&) :: Bool -> Bool -> Bool
- GitHub.Internal.Prelude: (*) :: Num a => a -> a -> a
- GitHub.Internal.Prelude: (**) :: Floating a => a -> a -> a
- GitHub.Internal.Prelude: (*>) :: Applicative f => f a -> f b -> f b
- GitHub.Internal.Prelude: (+) :: Num a => a -> a -> a
- GitHub.Internal.Prelude: (++) :: [a] -> [a] -> [a]
- GitHub.Internal.Prelude: (-) :: Num a => a -> a -> a
- GitHub.Internal.Prelude: (.) :: (b -> c) -> (a -> b) -> a -> c
- GitHub.Internal.Prelude: (/) :: Fractional a => a -> a -> a
- GitHub.Internal.Prelude: (/=) :: Eq a => a -> a -> Bool
- GitHub.Internal.Prelude: (<$) :: Functor f => a -> f b -> f a
- GitHub.Internal.Prelude: (<$>) :: Functor f => (a -> b) -> f a -> f b
- GitHub.Internal.Prelude: (<) :: Ord a => a -> a -> Bool
- GitHub.Internal.Prelude: (<*) :: Applicative f => f a -> f b -> f a
- GitHub.Internal.Prelude: (<*>) :: Applicative f => f (a -> b) -> f a -> f b
- GitHub.Internal.Prelude: (<=) :: Ord a => a -> a -> Bool
- GitHub.Internal.Prelude: (<>) :: Semigroup a => a -> a -> a
- GitHub.Internal.Prelude: (=<<) :: Monad m => (a -> m b) -> m a -> m b
- GitHub.Internal.Prelude: (==) :: Eq a => a -> a -> Bool
- GitHub.Internal.Prelude: (>) :: Ord a => a -> a -> Bool
- GitHub.Internal.Prelude: (>=) :: Ord a => a -> a -> Bool
- GitHub.Internal.Prelude: (>>) :: Monad m => m a -> m b -> m b
- GitHub.Internal.Prelude: (>>=) :: Monad m => m a -> (a -> m b) -> m b
- GitHub.Internal.Prelude: (^) :: (Num a, Integral b) => a -> b -> a
- GitHub.Internal.Prelude: (^^) :: (Fractional a, Integral b) => a -> b -> a
- GitHub.Internal.Prelude: (||) :: Bool -> Bool -> Bool
- GitHub.Internal.Prelude: EQ :: Ordering
- GitHub.Internal.Prelude: False :: Bool
- GitHub.Internal.Prelude: GT :: Ordering
- GitHub.Internal.Prelude: Just :: a -> Maybe a
- GitHub.Internal.Prelude: LT :: Ordering
- GitHub.Internal.Prelude: Left :: a -> Either a b
- GitHub.Internal.Prelude: Nothing :: Maybe a
- GitHub.Internal.Prelude: Right :: b -> Either a b
- GitHub.Internal.Prelude: True :: Bool
- GitHub.Internal.Prelude: abs :: Num a => a -> a
- GitHub.Internal.Prelude: acos :: Floating a => a -> a
- GitHub.Internal.Prelude: acosh :: Floating a => a -> a
- GitHub.Internal.Prelude: all :: Foldable t => (a -> Bool) -> t a -> Bool
- GitHub.Internal.Prelude: and :: Foldable t => t Bool -> Bool
- GitHub.Internal.Prelude: any :: Foldable t => (a -> Bool) -> t a -> Bool
- GitHub.Internal.Prelude: appendFile :: FilePath -> String -> IO ()
- GitHub.Internal.Prelude: asTypeOf :: a -> a -> a
- GitHub.Internal.Prelude: asin :: Floating a => a -> a
- GitHub.Internal.Prelude: asinh :: Floating a => a -> a
- GitHub.Internal.Prelude: atan :: Floating a => a -> a
- GitHub.Internal.Prelude: atan2 :: RealFloat a => a -> a -> a
- GitHub.Internal.Prelude: atanh :: Floating a => a -> a
- GitHub.Internal.Prelude: break :: (a -> Bool) -> [a] -> ([a], [a])
- GitHub.Internal.Prelude: ceiling :: (RealFrac a, Integral b) => a -> b
- GitHub.Internal.Prelude: class Functor f => Applicative (f :: Type -> Type)
- GitHub.Internal.Prelude: class Bounded a
- GitHub.Internal.Prelude: class Enum a
- GitHub.Internal.Prelude: class Eq a
- GitHub.Internal.Prelude: class Fractional a => Floating a
- GitHub.Internal.Prelude: class Foldable (t :: TYPE LiftedRep -> Type)
- GitHub.Internal.Prelude: class Num a => Fractional a
- GitHub.Internal.Prelude: class Functor (f :: Type -> Type)
- GitHub.Internal.Prelude: class (Real a, Enum a) => Integral a
- GitHub.Internal.Prelude: class IsString a
- GitHub.Internal.Prelude: class Applicative m => Monad (m :: Type -> Type)
- GitHub.Internal.Prelude: class Monad m => MonadFail (m :: Type -> Type)
- GitHub.Internal.Prelude: class Semigroup a => Monoid a
- GitHub.Internal.Prelude: class Num a
- GitHub.Internal.Prelude: class Eq a => Ord a
- GitHub.Internal.Prelude: class Read a
- GitHub.Internal.Prelude: class (Num a, Ord a) => Real a
- GitHub.Internal.Prelude: class (RealFrac a, Floating a) => RealFloat a
- GitHub.Internal.Prelude: class (Real a, Fractional a) => RealFrac a
- GitHub.Internal.Prelude: class Semigroup a
- GitHub.Internal.Prelude: class Show a
- GitHub.Internal.Prelude: class (Functor t, Foldable t) => Traversable (t :: Type -> Type)
- GitHub.Internal.Prelude: compare :: Ord a => a -> a -> Ordering
- GitHub.Internal.Prelude: concat :: Foldable t => t [a] -> [a]
- GitHub.Internal.Prelude: concatMap :: Foldable t => (a -> [b]) -> t a -> [b]
- GitHub.Internal.Prelude: const :: a -> b -> a
- GitHub.Internal.Prelude: cos :: Floating a => a -> a
- GitHub.Internal.Prelude: cosh :: Floating a => a -> a
- GitHub.Internal.Prelude: curry :: ((a, b) -> c) -> a -> b -> c
- GitHub.Internal.Prelude: cycle :: [a] -> [a]
- GitHub.Internal.Prelude: data Bool
- GitHub.Internal.Prelude: data Char
- GitHub.Internal.Prelude: data Double
- GitHub.Internal.Prelude: data Either a b
- GitHub.Internal.Prelude: data Float
- GitHub.Internal.Prelude: data IO a
- GitHub.Internal.Prelude: data Int
- GitHub.Internal.Prelude: data Integer
- GitHub.Internal.Prelude: data Maybe a
- GitHub.Internal.Prelude: data Ordering
- GitHub.Internal.Prelude: data Word
- GitHub.Internal.Prelude: decodeFloat :: RealFloat a => a -> (Integer, Int)
- GitHub.Internal.Prelude: div :: Integral a => a -> a -> a
- GitHub.Internal.Prelude: divMod :: Integral a => a -> a -> (a, a)
- GitHub.Internal.Prelude: drop :: Int -> [a] -> [a]
- GitHub.Internal.Prelude: dropWhile :: (a -> Bool) -> [a] -> [a]
- GitHub.Internal.Prelude: either :: (a -> c) -> (b -> c) -> Either a b -> c
- GitHub.Internal.Prelude: elem :: (Foldable t, Eq a) => a -> t a -> Bool
- GitHub.Internal.Prelude: encodeFloat :: RealFloat a => Integer -> Int -> a
- GitHub.Internal.Prelude: enumFrom :: Enum a => a -> [a]
- GitHub.Internal.Prelude: enumFromThen :: Enum a => a -> a -> [a]
- GitHub.Internal.Prelude: enumFromThenTo :: Enum a => a -> a -> a -> [a]
- GitHub.Internal.Prelude: enumFromTo :: Enum a => a -> a -> [a]
- GitHub.Internal.Prelude: error :: forall (r :: RuntimeRep) (a :: TYPE r). HasCallStack => [Char] -> a
- GitHub.Internal.Prelude: errorWithoutStackTrace :: forall (r :: RuntimeRep) (a :: TYPE r). [Char] -> a
- GitHub.Internal.Prelude: even :: Integral a => a -> Bool
- GitHub.Internal.Prelude: exp :: Floating a => a -> a
- GitHub.Internal.Prelude: exponent :: RealFloat a => a -> Int
- GitHub.Internal.Prelude: fail :: MonadFail m => String -> m a
- GitHub.Internal.Prelude: filter :: (a -> Bool) -> [a] -> [a]
- GitHub.Internal.Prelude: flip :: (a -> b -> c) -> b -> a -> c
- GitHub.Internal.Prelude: floatDigits :: RealFloat a => a -> Int
- GitHub.Internal.Prelude: floatRadix :: RealFloat a => a -> Integer
- GitHub.Internal.Prelude: floatRange :: RealFloat a => a -> (Int, Int)
- GitHub.Internal.Prelude: floor :: (RealFrac a, Integral b) => a -> b
- GitHub.Internal.Prelude: fmap :: Functor f => (a -> b) -> f a -> f b
- GitHub.Internal.Prelude: foldMap :: (Foldable t, Monoid m) => (a -> m) -> t a -> m
- GitHub.Internal.Prelude: foldl :: Foldable t => (b -> a -> b) -> b -> t a -> b
- GitHub.Internal.Prelude: foldl1 :: Foldable t => (a -> a -> a) -> t a -> a
- GitHub.Internal.Prelude: foldr :: Foldable t => (a -> b -> b) -> b -> t a -> b
- GitHub.Internal.Prelude: foldr1 :: Foldable t => (a -> a -> a) -> t a -> a
- GitHub.Internal.Prelude: fromEnum :: Enum a => a -> Int
- GitHub.Internal.Prelude: fromInteger :: Num a => Integer -> a
- GitHub.Internal.Prelude: fromIntegral :: (Integral a, Num b) => a -> b
- GitHub.Internal.Prelude: fromRational :: Fractional a => Rational -> a
- GitHub.Internal.Prelude: fromString :: IsString a => String -> a
- GitHub.Internal.Prelude: fst :: (a, b) -> a
- GitHub.Internal.Prelude: gcd :: Integral a => a -> a -> a
- GitHub.Internal.Prelude: getChar :: IO Char
- GitHub.Internal.Prelude: getContents :: IO String
- GitHub.Internal.Prelude: getLine :: IO String
- GitHub.Internal.Prelude: head :: [a] -> a
- GitHub.Internal.Prelude: id :: a -> a
- GitHub.Internal.Prelude: infix 4 `notElem`
- GitHub.Internal.Prelude: infixl 4 <$>
- GitHub.Internal.Prelude: infixl 6 -
- GitHub.Internal.Prelude: infixl 7 *
- GitHub.Internal.Prelude: infixl 9 !!
- GitHub.Internal.Prelude: infixr 0 $!
- GitHub.Internal.Prelude: infixr 1 =<<
- GitHub.Internal.Prelude: infixr 2 ||
- GitHub.Internal.Prelude: infixr 3 &&
- GitHub.Internal.Prelude: infixr 5 ++
- GitHub.Internal.Prelude: infixr 6 <>
- GitHub.Internal.Prelude: infixr 9 .
- GitHub.Internal.Prelude: init :: [a] -> [a]
- GitHub.Internal.Prelude: interact :: (String -> String) -> IO ()
- GitHub.Internal.Prelude: ioError :: IOError -> IO a
- GitHub.Internal.Prelude: isDenormalized :: RealFloat a => a -> Bool
- GitHub.Internal.Prelude: isIEEE :: RealFloat a => a -> Bool
- GitHub.Internal.Prelude: isInfinite :: RealFloat a => a -> Bool
- GitHub.Internal.Prelude: isNaN :: RealFloat a => a -> Bool
- GitHub.Internal.Prelude: isNegativeZero :: RealFloat a => a -> Bool
- GitHub.Internal.Prelude: iterate :: (a -> a) -> a -> [a]
- GitHub.Internal.Prelude: last :: [a] -> a
- GitHub.Internal.Prelude: lcm :: Integral a => a -> a -> a
- GitHub.Internal.Prelude: length :: Foldable t => t a -> Int
- GitHub.Internal.Prelude: lex :: ReadS String
- GitHub.Internal.Prelude: liftA2 :: Applicative f => (a -> b -> c) -> f a -> f b -> f c
- GitHub.Internal.Prelude: lines :: String -> [String]
- GitHub.Internal.Prelude: log :: Floating a => a -> a
- GitHub.Internal.Prelude: logBase :: Floating a => a -> a -> a
- GitHub.Internal.Prelude: lookup :: Eq a => a -> [(a, b)] -> Maybe b
- GitHub.Internal.Prelude: map :: (a -> b) -> [a] -> [b]
- GitHub.Internal.Prelude: mapM :: (Traversable t, Monad m) => (a -> m b) -> t a -> m (t b)
- GitHub.Internal.Prelude: mapM_ :: (Foldable t, Monad m) => (a -> m b) -> t a -> m ()
- GitHub.Internal.Prelude: mappend :: Monoid a => a -> a -> a
- GitHub.Internal.Prelude: max :: Ord a => a -> a -> a
- GitHub.Internal.Prelude: maxBound :: Bounded a => a
- GitHub.Internal.Prelude: maximum :: (Foldable t, Ord a) => t a -> a
- GitHub.Internal.Prelude: maybe :: b -> (a -> b) -> Maybe a -> b
- GitHub.Internal.Prelude: mconcat :: Monoid a => [a] -> a
- GitHub.Internal.Prelude: mempty :: Monoid a => a
- GitHub.Internal.Prelude: min :: Ord a => a -> a -> a
- GitHub.Internal.Prelude: minBound :: Bounded a => a
- GitHub.Internal.Prelude: minimum :: (Foldable t, Ord a) => t a -> a
- GitHub.Internal.Prelude: mod :: Integral a => a -> a -> a
- GitHub.Internal.Prelude: negate :: Num a => a -> a
- GitHub.Internal.Prelude: not :: Bool -> Bool
- GitHub.Internal.Prelude: notElem :: (Foldable t, Eq a) => a -> t a -> Bool
- GitHub.Internal.Prelude: null :: Foldable t => t a -> Bool
- GitHub.Internal.Prelude: odd :: Integral a => a -> Bool
- GitHub.Internal.Prelude: or :: Foldable t => t Bool -> Bool
- GitHub.Internal.Prelude: otherwise :: Bool
- GitHub.Internal.Prelude: pi :: Floating a => a
- GitHub.Internal.Prelude: pred :: Enum a => a -> a
- GitHub.Internal.Prelude: print :: Show a => a -> IO ()
- GitHub.Internal.Prelude: product :: (Foldable t, Num a) => t a -> a
- GitHub.Internal.Prelude: properFraction :: (RealFrac a, Integral b) => a -> (b, a)
- GitHub.Internal.Prelude: pure :: Applicative f => a -> f a
- GitHub.Internal.Prelude: putChar :: Char -> IO ()
- GitHub.Internal.Prelude: putStr :: String -> IO ()
- GitHub.Internal.Prelude: putStrLn :: String -> IO ()
- GitHub.Internal.Prelude: quot :: Integral a => a -> a -> a
- GitHub.Internal.Prelude: quotRem :: Integral a => a -> a -> (a, a)
- GitHub.Internal.Prelude: read :: Read a => String -> a
- GitHub.Internal.Prelude: readFile :: FilePath -> IO String
- GitHub.Internal.Prelude: readIO :: Read a => String -> IO a
- GitHub.Internal.Prelude: readList :: Read a => ReadS [a]
- GitHub.Internal.Prelude: readLn :: Read a => IO a
- GitHub.Internal.Prelude: readParen :: Bool -> ReadS a -> ReadS a
- GitHub.Internal.Prelude: reads :: Read a => ReadS a
- GitHub.Internal.Prelude: readsPrec :: Read a => Int -> ReadS a
- GitHub.Internal.Prelude: realToFrac :: (Real a, Fractional b) => a -> b
- GitHub.Internal.Prelude: recip :: Fractional a => a -> a
- GitHub.Internal.Prelude: rem :: Integral a => a -> a -> a
- GitHub.Internal.Prelude: repeat :: a -> [a]
- GitHub.Internal.Prelude: replicate :: Int -> a -> [a]
- GitHub.Internal.Prelude: return :: Monad m => a -> m a
- GitHub.Internal.Prelude: reverse :: [a] -> [a]
- GitHub.Internal.Prelude: round :: (RealFrac a, Integral b) => a -> b
- GitHub.Internal.Prelude: scaleFloat :: RealFloat a => Int -> a -> a
- GitHub.Internal.Prelude: scanl :: (b -> a -> b) -> b -> [a] -> [b]
- GitHub.Internal.Prelude: scanl1 :: (a -> a -> a) -> [a] -> [a]
- GitHub.Internal.Prelude: scanr :: (a -> b -> b) -> b -> [a] -> [b]
- GitHub.Internal.Prelude: scanr1 :: (a -> a -> a) -> [a] -> [a]
- GitHub.Internal.Prelude: seq :: forall {r :: RuntimeRep} a (b :: TYPE r). a -> b -> b
- GitHub.Internal.Prelude: sequence :: (Traversable t, Monad m) => t (m a) -> m (t a)
- GitHub.Internal.Prelude: sequenceA :: (Traversable t, Applicative f) => t (f a) -> f (t a)
- GitHub.Internal.Prelude: sequence_ :: (Foldable t, Monad m) => t (m a) -> m ()
- GitHub.Internal.Prelude: show :: Show a => a -> String
- GitHub.Internal.Prelude: showChar :: Char -> ShowS
- GitHub.Internal.Prelude: showList :: Show a => [a] -> ShowS
- GitHub.Internal.Prelude: showParen :: Bool -> ShowS -> ShowS
- GitHub.Internal.Prelude: showString :: String -> ShowS
- GitHub.Internal.Prelude: shows :: Show a => a -> ShowS
- GitHub.Internal.Prelude: showsPrec :: Show a => Int -> a -> ShowS
- GitHub.Internal.Prelude: significand :: RealFloat a => a -> a
- GitHub.Internal.Prelude: signum :: Num a => a -> a
- GitHub.Internal.Prelude: sin :: Floating a => a -> a
- GitHub.Internal.Prelude: sinh :: Floating a => a -> a
- GitHub.Internal.Prelude: snd :: (a, b) -> b
- GitHub.Internal.Prelude: span :: (a -> Bool) -> [a] -> ([a], [a])
- GitHub.Internal.Prelude: splitAt :: Int -> [a] -> ([a], [a])
- GitHub.Internal.Prelude: sqrt :: Floating a => a -> a
- GitHub.Internal.Prelude: subtract :: Num a => a -> a -> a
- GitHub.Internal.Prelude: succ :: Enum a => a -> a
- GitHub.Internal.Prelude: sum :: (Foldable t, Num a) => t a -> a
- GitHub.Internal.Prelude: tail :: [a] -> [a]
- GitHub.Internal.Prelude: take :: Int -> [a] -> [a]
- GitHub.Internal.Prelude: takeWhile :: (a -> Bool) -> [a] -> [a]
- GitHub.Internal.Prelude: tan :: Floating a => a -> a
- GitHub.Internal.Prelude: tanh :: Floating a => a -> a
- GitHub.Internal.Prelude: toEnum :: Enum a => Int -> a
- GitHub.Internal.Prelude: toInteger :: Integral a => a -> Integer
- GitHub.Internal.Prelude: toRational :: Real a => a -> Rational
- GitHub.Internal.Prelude: traverse :: (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b)
- GitHub.Internal.Prelude: truncate :: (RealFrac a, Integral b) => a -> b
- GitHub.Internal.Prelude: type FilePath = String
- GitHub.Internal.Prelude: type IOError = IOException
- GitHub.Internal.Prelude: type Rational = Ratio Integer
- GitHub.Internal.Prelude: type ReadS a = String -> [(a, String)]
- GitHub.Internal.Prelude: type ShowS = String -> String
- GitHub.Internal.Prelude: type String = [Char]
- GitHub.Internal.Prelude: uncurry :: (a -> b -> c) -> (a, b) -> c
- GitHub.Internal.Prelude: undefined :: forall (r :: RuntimeRep) (a :: TYPE r). HasCallStack => a
- GitHub.Internal.Prelude: unlines :: [String] -> String
- GitHub.Internal.Prelude: until :: (a -> Bool) -> (a -> a) -> a -> a
- GitHub.Internal.Prelude: unwords :: [String] -> String
- GitHub.Internal.Prelude: unzip :: [(a, b)] -> ([a], [b])
- GitHub.Internal.Prelude: unzip3 :: [(a, b, c)] -> ([a], [b], [c])
- GitHub.Internal.Prelude: userError :: String -> IOError
- GitHub.Internal.Prelude: words :: String -> [String]
- GitHub.Internal.Prelude: writeFile :: FilePath -> String -> IO ()
- GitHub.Internal.Prelude: zip :: [a] -> [b] -> [(a, b)]
- GitHub.Internal.Prelude: zip3 :: [a] -> [b] -> [c] -> [(a, b, c)]
- GitHub.Internal.Prelude: zipWith :: (a -> b -> c) -> [a] -> [b] -> [c]
- GitHub.Internal.Prelude: zipWith3 :: (a -> b -> c -> d) -> [a] -> [b] -> [c] -> [d]
+ GitHub: commentReactionsR :: forall (k :: RW). Name Owner -> Name Repo -> Id Comment -> FetchCount -> Request k (Vector Reaction)
+ GitHub: createCommentReactionR :: Name Owner -> Name Repo -> Id Comment -> ReactionContent -> Request 'RW Reaction
+ GitHub: createIssueReactionR :: Name Owner -> Name Repo -> Id Issue -> ReactionContent -> Request 'RW Reaction
+ GitHub: deleteCommentReactionR :: Name Owner -> Name Repo -> Id Comment -> Id Reaction -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
+ GitHub: deleteIssueReactionR :: Name Owner -> Name Repo -> Id Issue -> Id Reaction -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
+ GitHub: issueReactionsR :: forall (k :: RW). Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector Reaction)
+ GitHub: orgMembershipR :: Name User -> Name Organization -> Request 'RA Membership
+ GitHub.Auth: JWT :: JWTToken -> Auth
+ GitHub.Auth: type JWTToken = Text
+ GitHub.Auth: type Token = ByteString
+ GitHub.Data.Actions.WorkflowJobs: [jobName] :: Job -> !Name Job
+ GitHub.Data.Activities: ApprovalRequestedReason :: NotificationReason
+ GitHub.Data.Activities: CiActivityReason :: NotificationReason
+ GitHub.Data.Activities: MemberFeatureRequestedReason :: NotificationReason
+ GitHub.Data.Activities: SecurityAdvisoryCreditReason :: NotificationReason
+ GitHub.Data.Activities: SecurityAlertReason :: NotificationReason
+ GitHub.Data.Definitions: Membership :: !URL -> !MembershipState -> !MembershipRole -> !URL -> !SimpleOrganization -> !SimpleUser -> Membership
+ GitHub.Data.Definitions: MembershipActive :: MembershipState
+ GitHub.Data.Definitions: MembershipPending :: MembershipState
+ GitHub.Data.Definitions: MembershipRoleAdmin :: MembershipRole
+ GitHub.Data.Definitions: MembershipRoleBillingManager :: MembershipRole
+ GitHub.Data.Definitions: MembershipRoleMember :: MembershipRole
+ GitHub.Data.Definitions: [membershipOrganizationUrl] :: Membership -> !URL
+ GitHub.Data.Definitions: [membershipOrganization] :: Membership -> !SimpleOrganization
+ GitHub.Data.Definitions: [membershipRole] :: Membership -> !MembershipRole
+ GitHub.Data.Definitions: [membershipState] :: Membership -> !MembershipState
+ GitHub.Data.Definitions: [membershipUrl] :: Membership -> !URL
+ GitHub.Data.Definitions: [membershipUser] :: Membership -> !SimpleUser
+ GitHub.Data.Definitions: data Membership
+ GitHub.Data.Definitions: data MembershipRole
+ GitHub.Data.Definitions: data MembershipState
+ GitHub.Data.Definitions: instance Control.DeepSeq.NFData GitHub.Data.Definitions.Membership
+ GitHub.Data.Definitions: instance Control.DeepSeq.NFData GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance Control.DeepSeq.NFData GitHub.Data.Definitions.MembershipState
+ GitHub.Data.Definitions: instance Data.Aeson.Types.FromJSON.FromJSON GitHub.Data.Definitions.Membership
+ GitHub.Data.Definitions: instance Data.Aeson.Types.FromJSON.FromJSON GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance Data.Aeson.Types.FromJSON.FromJSON GitHub.Data.Definitions.MembershipState
+ GitHub.Data.Definitions: instance Data.Binary.Class.Binary GitHub.Data.Definitions.Membership
+ GitHub.Data.Definitions: instance Data.Binary.Class.Binary GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance Data.Binary.Class.Binary GitHub.Data.Definitions.MembershipState
+ GitHub.Data.Definitions: instance Data.Data.Data GitHub.Data.Definitions.Membership
+ GitHub.Data.Definitions: instance Data.Data.Data GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance Data.Data.Data GitHub.Data.Definitions.MembershipState
+ GitHub.Data.Definitions: instance GHC.Classes.Eq GitHub.Data.Definitions.Membership
+ GitHub.Data.Definitions: instance GHC.Classes.Eq GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance GHC.Classes.Eq GitHub.Data.Definitions.MembershipState
+ GitHub.Data.Definitions: instance GHC.Classes.Ord GitHub.Data.Definitions.Membership
+ GitHub.Data.Definitions: instance GHC.Classes.Ord GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance GHC.Classes.Ord GitHub.Data.Definitions.MembershipState
+ GitHub.Data.Definitions: instance GHC.Enum.Bounded GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance GHC.Enum.Enum GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance GHC.Generics.Generic GitHub.Data.Definitions.Membership
+ GitHub.Data.Definitions: instance GHC.Generics.Generic GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance GHC.Generics.Generic GitHub.Data.Definitions.MembershipState
+ GitHub.Data.Definitions: instance GHC.Show.Show GitHub.Data.Definitions.Membership
+ GitHub.Data.Definitions: instance GHC.Show.Show GitHub.Data.Definitions.MembershipRole
+ GitHub.Data.Definitions: instance GHC.Show.Show GitHub.Data.Definitions.MembershipState
+ GitHub.Data.Options: StateReasonDuplicate :: IssueStateReason
+ GitHub.Data.Reactions: Confused :: ReactionContent
+ GitHub.Data.Reactions: Eyes :: ReactionContent
+ GitHub.Data.Reactions: Heart :: ReactionContent
+ GitHub.Data.Reactions: Hooray :: ReactionContent
+ GitHub.Data.Reactions: Laugh :: ReactionContent
+ GitHub.Data.Reactions: MinusOne :: ReactionContent
+ GitHub.Data.Reactions: NewReaction :: !ReactionContent -> NewReaction
+ GitHub.Data.Reactions: PlusOne :: ReactionContent
+ GitHub.Data.Reactions: Reaction :: Id Reaction -> !Maybe SimpleUser -> !ReactionContent -> !UTCTime -> Reaction
+ GitHub.Data.Reactions: Rocket :: ReactionContent
+ GitHub.Data.Reactions: [newReactionContent] :: NewReaction -> !ReactionContent
+ GitHub.Data.Reactions: [reactionContent] :: Reaction -> !ReactionContent
+ GitHub.Data.Reactions: [reactionCreatedAt] :: Reaction -> !UTCTime
+ GitHub.Data.Reactions: [reactionId] :: Reaction -> Id Reaction
+ GitHub.Data.Reactions: [reactionUser] :: Reaction -> !Maybe SimpleUser
+ GitHub.Data.Reactions: data NewReaction
+ GitHub.Data.Reactions: data Reaction
+ GitHub.Data.Reactions: data ReactionContent
+ GitHub.Data.Reactions: instance Control.DeepSeq.NFData GitHub.Data.Reactions.NewReaction
+ GitHub.Data.Reactions: instance Control.DeepSeq.NFData GitHub.Data.Reactions.Reaction
+ GitHub.Data.Reactions: instance Control.DeepSeq.NFData GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance Data.Aeson.Types.FromJSON.FromJSON GitHub.Data.Reactions.Reaction
+ GitHub.Data.Reactions: instance Data.Aeson.Types.FromJSON.FromJSON GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance Data.Aeson.Types.ToJSON.ToJSON GitHub.Data.Reactions.NewReaction
+ GitHub.Data.Reactions: instance Data.Aeson.Types.ToJSON.ToJSON GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance Data.Binary.Class.Binary GitHub.Data.Reactions.NewReaction
+ GitHub.Data.Reactions: instance Data.Binary.Class.Binary GitHub.Data.Reactions.Reaction
+ GitHub.Data.Reactions: instance Data.Binary.Class.Binary GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance Data.Data.Data GitHub.Data.Reactions.NewReaction
+ GitHub.Data.Reactions: instance Data.Data.Data GitHub.Data.Reactions.Reaction
+ GitHub.Data.Reactions: instance Data.Data.Data GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance GHC.Classes.Eq GitHub.Data.Reactions.NewReaction
+ GitHub.Data.Reactions: instance GHC.Classes.Eq GitHub.Data.Reactions.Reaction
+ GitHub.Data.Reactions: instance GHC.Classes.Eq GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance GHC.Classes.Ord GitHub.Data.Reactions.NewReaction
+ GitHub.Data.Reactions: instance GHC.Classes.Ord GitHub.Data.Reactions.Reaction
+ GitHub.Data.Reactions: instance GHC.Classes.Ord GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance GHC.Enum.Bounded GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance GHC.Enum.Enum GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance GHC.Generics.Generic GitHub.Data.Reactions.NewReaction
+ GitHub.Data.Reactions: instance GHC.Generics.Generic GitHub.Data.Reactions.Reaction
+ GitHub.Data.Reactions: instance GHC.Generics.Generic GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Reactions: instance GHC.Show.Show GitHub.Data.Reactions.NewReaction
+ GitHub.Data.Reactions: instance GHC.Show.Show GitHub.Data.Reactions.Reaction
+ GitHub.Data.Reactions: instance GHC.Show.Show GitHub.Data.Reactions.ReactionContent
+ GitHub.Data.Request: FetchPage :: PageParams -> FetchCount
+ GitHub.Data.Request: PageLinks :: Maybe URI -> Maybe URI -> Maybe URI -> Maybe URI -> PageLinks
+ GitHub.Data.Request: PageParams :: Maybe Int -> Maybe Int -> PageParams
+ GitHub.Data.Request: [pageLinksFirst] :: PageLinks -> Maybe URI
+ GitHub.Data.Request: [pageLinksLast] :: PageLinks -> Maybe URI
+ GitHub.Data.Request: [pageLinksNext] :: PageLinks -> Maybe URI
+ GitHub.Data.Request: [pageLinksPrev] :: PageLinks -> Maybe URI
+ GitHub.Data.Request: [pageParamsPage] :: PageParams -> Maybe Int
+ GitHub.Data.Request: [pageParamsPerPage] :: PageParams -> Maybe Int
+ GitHub.Data.Request: data PageLinks
+ GitHub.Data.Request: data PageParams
+ GitHub.Data.Request: instance Control.DeepSeq.NFData GitHub.Data.Request.PageLinks
+ GitHub.Data.Request: instance Control.DeepSeq.NFData GitHub.Data.Request.PageParams
+ GitHub.Data.Request: instance Data.Binary.Class.Binary GitHub.Data.Request.PageParams
+ GitHub.Data.Request: instance Data.Hashable.Class.Hashable GitHub.Data.Request.PageParams
+ GitHub.Data.Request: instance GHC.Classes.Eq GitHub.Data.Request.PageLinks
+ GitHub.Data.Request: instance GHC.Classes.Eq GitHub.Data.Request.PageParams
+ GitHub.Data.Request: instance GHC.Classes.Ord GitHub.Data.Request.PageLinks
+ GitHub.Data.Request: instance GHC.Classes.Ord GitHub.Data.Request.PageParams
+ GitHub.Data.Request: instance GHC.Generics.Generic GitHub.Data.Request.PageLinks
+ GitHub.Data.Request: instance GHC.Generics.Generic GitHub.Data.Request.PageParams
+ GitHub.Data.Request: instance GHC.Read.Read GitHub.Data.Request.PageParams
+ GitHub.Data.Request: instance GHC.Show.Show GitHub.Data.Request.PageLinks
+ GitHub.Data.Request: instance GHC.Show.Show GitHub.Data.Request.PageParams
+ GitHub.Endpoints.Organizations.Members: orgMembershipR :: Name User -> Name Organization -> Request 'RA Membership
+ GitHub.Endpoints.Reactions: commentReactionsR :: forall (k :: RW). Name Owner -> Name Repo -> Id Comment -> FetchCount -> Request k (Vector Reaction)
+ GitHub.Endpoints.Reactions: createCommentReactionR :: Name Owner -> Name Repo -> Id Comment -> ReactionContent -> Request 'RW Reaction
+ GitHub.Endpoints.Reactions: createIssueReactionR :: Name Owner -> Name Repo -> Id Issue -> ReactionContent -> Request 'RW Reaction
+ GitHub.Endpoints.Reactions: deleteCommentReactionR :: Name Owner -> Name Repo -> Id Comment -> Id Reaction -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
+ GitHub.Endpoints.Reactions: deleteIssueReactionR :: Name Owner -> Name Repo -> Id Issue -> Id Reaction -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
+ GitHub.Endpoints.Reactions: issueReactionsR :: forall (k :: RW). Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector Reaction)
+ GitHub.Internal.Prelude: ($dmhashWithSalt) :: (Hashable a, Generic a, GHashable Zero (Rep a)) => Int -> a -> Int
+ GitHub.Internal.Prelude: ($dmparseJSON) :: (FromJSON a, Generic a, GFromJSON Zero (Rep a)) => Value -> Parser a
+ GitHub.Internal.Prelude: ($dmrnf) :: (NFData a, Generic a, GNFData Zero (Rep a)) => a -> ()
+ GitHub.Internal.Prelude: ($dmtoJSON) :: (ToJSON a, Generic a, GToJSON' Value Zero (Rep a)) => a -> Value
+ GitHub.Internal.Prelude: omitField :: ToJSON a => a -> Bool
+ GitHub.Internal.Prelude: omittedField :: FromJSON a => Maybe a
+ GitHub.Request: parsePageLinks :: Response a -> PageLinks
- GitHub: acceptInvitationFromR :: Id RepoInvitation -> GenRequest 'MtUnit 'RW ()
+ GitHub: acceptInvitationFromR :: Id RepoInvitation -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: addCollaboratorR :: Name Owner -> Name Repo -> Name User -> GenRequest 'MtJSON 'RW (Maybe RepoInvitation)
+ GitHub: addCollaboratorR :: Name Owner -> Name Repo -> Name User -> GenRequest ('MtJSON :: MediaType Type) 'RW (Maybe RepoInvitation)
- GitHub: addOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> Id Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub: addOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> Id Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: approveWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub: approveWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: archiveForR :: Name Owner -> Name Repo -> ArchiveFormat -> Maybe Text -> GenRequest 'MtRedirect rw URI
+ GitHub: archiveForR :: forall (rw :: RW). Name Owner -> Name Repo -> ArchiveFormat -> Maybe Text -> GenRequest ('MtRedirect :: MediaType Type) rw URI
- GitHub: blobR :: Name Owner -> Name Repo -> Name Blob -> Request k Blob
+ GitHub: blobR :: forall (k :: RW). Name Owner -> Name Repo -> Name Blob -> Request k Blob
- GitHub: branchesForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Branch)
+ GitHub: branchesForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Branch)
- GitHub: cacheUsageByRepositoryR :: Name Organization -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount RepositoryCacheUsage)
+ GitHub: cacheUsageByRepositoryR :: Name Organization -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount RepositoryCacheUsage)
- GitHub: cacheUsageOrganizationR :: Name Organization -> GenRequest 'MtJSON 'RA OrganizationCacheUsage
+ GitHub: cacheUsageOrganizationR :: Name Organization -> GenRequest ('MtJSON :: MediaType Type) 'RA OrganizationCacheUsage
- GitHub: cacheUsageR :: Name Owner -> Name Repo -> Request k RepositoryCacheUsage
+ GitHub: cacheUsageR :: forall (k :: RW). Name Owner -> Name Repo -> Request k RepositoryCacheUsage
- GitHub: cachesForRepoR :: Name Owner -> Name Repo -> CacheMod -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount Cache)
+ GitHub: cachesForRepoR :: Name Owner -> Name Repo -> CacheMod -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount Cache)
- GitHub: cancelWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub: cancelWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: collaboratorPermissionOnR :: Name Owner -> Name Repo -> Name User -> GenRequest 'MtJSON rw CollaboratorWithPermission
+ GitHub: collaboratorPermissionOnR :: forall (rw :: RW). Name Owner -> Name Repo -> Name User -> GenRequest ('MtJSON :: MediaType Type) rw CollaboratorWithPermission
- GitHub: collaboratorsOnR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub: collaboratorsOnR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
- GitHub: commentR :: Name Owner -> Name Repo -> Id Comment -> Request k IssueComment
+ GitHub: commentR :: forall (k :: RW). Name Owner -> Name Repo -> Id Comment -> Request k IssueComment
- GitHub: commentsForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Comment)
+ GitHub: commentsForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Comment)
- GitHub: commentsOnR :: Name Gist -> FetchCount -> Request k (Vector GistComment)
+ GitHub: commentsOnR :: forall (k :: RW). Name Gist -> FetchCount -> Request k (Vector GistComment)
- GitHub: commentsR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector IssueComment)
+ GitHub: commentsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector IssueComment)
- GitHub: commitCommentForR :: Name Owner -> Name Repo -> Id Comment -> Request k Comment
+ GitHub: commitCommentForR :: forall (k :: RW). Name Owner -> Name Repo -> Id Comment -> Request k Comment
- GitHub: commitCommentsForR :: Name Owner -> Name Repo -> Name Commit -> FetchCount -> Request k (Vector Comment)
+ GitHub: commitCommentsForR :: forall (k :: RW). Name Owner -> Name Repo -> Name Commit -> FetchCount -> Request k (Vector Comment)
- GitHub: commitR :: Name Owner -> Name Repo -> Name Commit -> Request k Commit
+ GitHub: commitR :: forall (k :: RW). Name Owner -> Name Repo -> Name Commit -> Request k Commit
- GitHub: commitsForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Commit)
+ GitHub: commitsForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Commit)
- GitHub: commitsWithOptionsForR :: Name Owner -> Name Repo -> FetchCount -> [CommitQueryOption] -> Request k (Vector Commit)
+ GitHub: commitsWithOptionsForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> [CommitQueryOption] -> Request k (Vector Commit)
- GitHub: contentsForR :: Name Owner -> Name Repo -> Text -> Maybe Text -> Request k Content
+ GitHub: contentsForR :: forall (k :: RW). Name Owner -> Name Repo -> Text -> Maybe Text -> Request k Content
- GitHub: contributorsR :: Name Owner -> Name Repo -> Bool -> FetchCount -> Request k (Vector Contributor)
+ GitHub: contributorsR :: forall (k :: RW). Name Owner -> Name Repo -> Bool -> FetchCount -> Request k (Vector Contributor)
- GitHub: currentUserReposR :: RepoPublicity -> FetchCount -> Request k (Vector Repo)
+ GitHub: currentUserReposR :: forall (k :: RW). RepoPublicity -> FetchCount -> Request k (Vector Repo)
- GitHub: deleteArtifactR :: Name Owner -> Name Repo -> Id Comment -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteArtifactR :: Name Owner -> Name Repo -> Id Comment -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteCacheR :: Name Owner -> Name Repo -> Id Cache -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteCacheR :: Name Owner -> Name Repo -> Id Cache -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteCommentR :: Name Owner -> Name Repo -> Id Comment -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteCommentR :: Name Owner -> Name Repo -> Id Comment -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteEnvironmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteEnvironmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteFileR :: Name Owner -> Name Repo -> DeleteFile -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteFileR :: Name Owner -> Name Repo -> DeleteFile -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteGistR :: Name Gist -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteGistR :: Name Gist -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteLabelR :: Name Owner -> Name Repo -> Name IssueLabel -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteLabelR :: Name Owner -> Name Repo -> Name IssueLabel -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteMilestoneR :: Name Owner -> Name Repo -> Id Milestone -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteMilestoneR :: Name Owner -> Name Repo -> Id Milestone -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteOrganizationSecretR :: Name Organization -> Name OrganizationSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteOrganizationSecretR :: Name Organization -> Name OrganizationSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteReferenceR :: Name Owner -> Name Repo -> Name GitReference -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteReferenceR :: Name Owner -> Name Repo -> Name GitReference -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteRepoDeployKeyR :: Name Owner -> Name Repo -> Id RepoDeployKey -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteRepoDeployKeyR :: Name Owner -> Name Repo -> Id RepoDeployKey -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteRepoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteRepoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteTeamMembershipForR :: Id Team -> Name Owner -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteTeamMembershipForR :: Id Team -> Name Owner -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteTeamR :: Id Team -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteTeamR :: Id Team -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteUserPublicSSHKeyR :: Id PublicSSHKey -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteUserPublicSSHKeyR :: Id PublicSSHKey -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteWorkflowRunLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteWorkflowRunLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: deleteWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub: deleteWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: diffR :: Name Owner -> Name Repo -> Name Commit -> Name Commit -> Request k Diff
+ GitHub: diffR :: forall (k :: RW). Name Owner -> Name Repo -> Name Commit -> Name Commit -> Request k Diff
- GitHub: disableWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest 'MtUnit 'RW ()
+ GitHub: disableWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: downloadArtifactR :: Name Owner -> Name Repo -> Id Artifact -> GenRequest 'MtRedirect 'RW URI
+ GitHub: downloadArtifactR :: Name Owner -> Name Repo -> Id Artifact -> GenRequest ('MtRedirect :: MediaType Type) 'RW URI
- GitHub: downloadJobLogsR :: Name Owner -> Name Repo -> Id Job -> GenRequest 'MtRedirect 'RO URI
+ GitHub: downloadJobLogsR :: Name Owner -> Name Repo -> Id Job -> GenRequest ('MtRedirect :: MediaType Type) 'RO URI
- GitHub: downloadWorkflowRunAttemptLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> GenRequest 'MtRedirect 'RO URI
+ GitHub: downloadWorkflowRunAttemptLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> GenRequest ('MtRedirect :: MediaType Type) 'RO URI
- GitHub: downloadWorkflowRunLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtRedirect 'RA URI
+ GitHub: downloadWorkflowRunLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtRedirect :: MediaType Type) 'RA URI
- GitHub: enableWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest 'MtUnit 'RW ()
+ GitHub: enableWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: environmentPublicKeyR :: Id Repo -> Name Environment -> GenRequest 'MtJSON 'RA PublicKey
+ GitHub: environmentPublicKeyR :: Id Repo -> Name Environment -> GenRequest ('MtJSON :: MediaType Type) 'RA PublicKey
- GitHub: environmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> GenRequest 'MtJSON 'RA RepoSecret
+ GitHub: environmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> GenRequest ('MtJSON :: MediaType Type) 'RA RepoSecret
- GitHub: environmentSecretsR :: Id Repo -> Name Environment -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount RepoSecret)
+ GitHub: environmentSecretsR :: Id Repo -> Name Environment -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount RepoSecret)
- GitHub: eventR :: Name Owner -> Name Repo -> Id IssueEvent -> Request k IssueEvent
+ GitHub: eventR :: forall (k :: RW). Name Owner -> Name Repo -> Id IssueEvent -> Request k IssueEvent
- GitHub: eventsForIssueR :: Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector IssueEvent)
+ GitHub: eventsForIssueR :: forall (k :: RW). Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector IssueEvent)
- GitHub: eventsForRepoR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector IssueEvent)
+ GitHub: eventsForRepoR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector IssueEvent)
- GitHub: forksForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Repo)
+ GitHub: forksForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Repo)
- GitHub: gistCommentR :: Id GistComment -> Request k GistComment
+ GitHub: gistCommentR :: forall (k :: RW). Id GistComment -> Request k GistComment
- GitHub: gistR :: Name Gist -> Request k Gist
+ GitHub: gistR :: forall (k :: RW). Name Gist -> Request k Gist
- GitHub: gistsR :: Name Owner -> FetchCount -> Request k (Vector Gist)
+ GitHub: gistsR :: forall (k :: RW). Name Owner -> FetchCount -> Request k (Vector Gist)
- GitHub: gitCommitR :: Name Owner -> Name Repo -> Name GitCommit -> Request k GitCommit
+ GitHub: gitCommitR :: forall (k :: RW). Name Owner -> Name Repo -> Name GitCommit -> Request k GitCommit
- GitHub: isCollaboratorOnR :: Name Owner -> Name Repo -> Name User -> GenRequest 'MtStatus rw Bool
+ GitHub: isCollaboratorOnR :: forall (rw :: RW). Name Owner -> Name Repo -> Name User -> GenRequest ('MtStatus :: MediaType Type) rw Bool
- GitHub: isMemberOfR :: Name User -> Name Organization -> GenRequest 'MtStatus rw Bool
+ GitHub: isMemberOfR :: forall (rw :: RW). Name User -> Name Organization -> GenRequest ('MtStatus :: MediaType Type) rw Bool
- GitHub: isPullRequestMergedR :: Name Owner -> Name Repo -> IssueNumber -> GenRequest 'MtStatus rw Bool
+ GitHub: isPullRequestMergedR :: forall (rw :: RW). Name Owner -> Name Repo -> IssueNumber -> GenRequest ('MtStatus :: MediaType Type) rw Bool
- GitHub: issueR :: Name Owner -> Name Repo -> IssueNumber -> Request k Issue
+ GitHub: issueR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> Request k Issue
- GitHub: issuesForRepoR :: Name Owner -> Name Repo -> IssueRepoMod -> FetchCount -> Request k (Vector Issue)
+ GitHub: issuesForRepoR :: forall (k :: RW). Name Owner -> Name Repo -> IssueRepoMod -> FetchCount -> Request k (Vector Issue)
- GitHub: jobsForWorkflowRunAttemptR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount Job)
+ GitHub: jobsForWorkflowRunAttemptR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount Job)
- GitHub: jobsForWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount Job)
+ GitHub: jobsForWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount Job)
- GitHub: labelR :: Name Owner -> Name Repo -> Name IssueLabel -> Request k IssueLabel
+ GitHub: labelR :: forall (k :: RW). Name Owner -> Name Repo -> Name IssueLabel -> Request k IssueLabel
- GitHub: labelsOnIssueR :: Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector IssueLabel)
+ GitHub: labelsOnIssueR :: forall (k :: RW). Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector IssueLabel)
- GitHub: labelsOnMilestoneR :: Name Owner -> Name Repo -> Id Milestone -> FetchCount -> Request k (Vector IssueLabel)
+ GitHub: labelsOnMilestoneR :: forall (k :: RW). Name Owner -> Name Repo -> Id Milestone -> FetchCount -> Request k (Vector IssueLabel)
- GitHub: labelsOnRepoR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector IssueLabel)
+ GitHub: labelsOnRepoR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector IssueLabel)
- GitHub: languagesForR :: Name Owner -> Name Repo -> Request k Languages
+ GitHub: languagesForR :: forall (k :: RW). Name Owner -> Name Repo -> Request k Languages
- GitHub: latestReleaseR :: Name Owner -> Name Repo -> Request k Release
+ GitHub: latestReleaseR :: forall (k :: RW). Name Owner -> Name Repo -> Request k Release
- GitHub: listInvitationsForR :: FetchCount -> Request k (Vector RepoInvitation)
+ GitHub: listInvitationsForR :: forall (k :: RW). FetchCount -> Request k (Vector RepoInvitation)
- GitHub: listInvitationsOnR :: Name Owner -> Name Repo -> FetchCount -> GenRequest 'MtJSON k (Vector RepoInvitation)
+ GitHub: listInvitationsOnR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) k (Vector RepoInvitation)
- GitHub: listTeamReposR :: Id Team -> FetchCount -> Request k (Vector Repo)
+ GitHub: listTeamReposR :: forall (k :: RW). Id Team -> FetchCount -> Request k (Vector Repo)
- GitHub: markAllNotificationsAsReadR :: GenRequest 'MtUnit 'RW ()
+ GitHub: markAllNotificationsAsReadR :: GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: markNotificationAsReadR :: Id Notification -> GenRequest 'MtUnit 'RW ()
+ GitHub: markNotificationAsReadR :: Id Notification -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: membersOfR :: Name Organization -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub: membersOfR :: forall (k :: RW). Name Organization -> FetchCount -> Request k (Vector SimpleUser)
- GitHub: membersOfWithR :: Name Organization -> OrgMemberFilter -> OrgMemberRole -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub: membersOfWithR :: forall (k :: RW). Name Organization -> OrgMemberFilter -> OrgMemberRole -> FetchCount -> Request k (Vector SimpleUser)
- GitHub: mergePullRequestR :: Name Owner -> Name Repo -> IssueNumber -> Maybe Text -> GenRequest 'MtStatus 'RW MergeResult
+ GitHub: mergePullRequestR :: Name Owner -> Name Repo -> IssueNumber -> Maybe Text -> GenRequest ('MtStatus :: MediaType Type) 'RW MergeResult
- GitHub: milestoneR :: Name Owner -> Name Repo -> Id Milestone -> Request k Milestone
+ GitHub: milestoneR :: forall (k :: RW). Name Owner -> Name Repo -> Id Milestone -> Request k Milestone
- GitHub: milestonesR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Milestone)
+ GitHub: milestonesR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Milestone)
- GitHub: myStarredAcceptStarR :: FetchCount -> GenRequest 'MtStar 'RA (Vector RepoStarred)
+ GitHub: myStarredAcceptStarR :: FetchCount -> GenRequest ('MtStar :: MediaType Type) 'RA (Vector RepoStarred)
- GitHub: namespacedReferencesR :: Name Owner -> Name Repo -> Text -> Request k [GitReference]
+ GitHub: namespacedReferencesR :: forall (k :: RW). Name Owner -> Name Repo -> Text -> Request k [GitReference]
- GitHub: nestedTreeR :: Name Owner -> Name Repo -> Name Tree -> Request k Tree
+ GitHub: nestedTreeR :: forall (k :: RW). Name Owner -> Name Repo -> Name Tree -> Request k Tree
- GitHub: organizationIssuesR :: Name Organization -> IssueMod -> FetchCount -> Request k (Vector Issue)
+ GitHub: organizationIssuesR :: forall (k :: RW). Name Organization -> IssueMod -> FetchCount -> Request k (Vector Issue)
- GitHub: organizationPublicKeyR :: Name Organization -> GenRequest 'MtJSON 'RA PublicKey
+ GitHub: organizationPublicKeyR :: Name Organization -> GenRequest ('MtJSON :: MediaType Type) 'RA PublicKey
- GitHub: organizationReposR :: Name Organization -> RepoPublicity -> FetchCount -> Request k (Vector Repo)
+ GitHub: organizationReposR :: forall (k :: RW). Name Organization -> RepoPublicity -> FetchCount -> Request k (Vector Repo)
- GitHub: organizationSecretR :: Name Organization -> Name OrganizationSecret -> GenRequest 'MtJSON 'RA OrganizationSecret
+ GitHub: organizationSecretR :: Name Organization -> Name OrganizationSecret -> GenRequest ('MtJSON :: MediaType Type) 'RA OrganizationSecret
- GitHub: organizationSecretsR :: Name Organization -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount OrganizationSecret)
+ GitHub: organizationSecretsR :: Name Organization -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount OrganizationSecret)
- GitHub: organizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount SelectedRepo)
+ GitHub: organizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount SelectedRepo)
- GitHub: organizationsR :: FetchCount -> Request k (Vector SimpleOrganization)
+ GitHub: organizationsR :: forall (k :: RW). FetchCount -> Request k (Vector SimpleOrganization)
- GitHub: outsideCollaboratorsR :: Name Organization -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub: outsideCollaboratorsR :: forall (k :: RW). Name Organization -> FetchCount -> Request k (Vector SimpleUser)
- GitHub: ownerInfoForR :: Name Owner -> Request k Owner
+ GitHub: ownerInfoForR :: forall (k :: RW). Name Owner -> Request k Owner
- GitHub: pingRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest 'MtStatus 'RW Bool
+ GitHub: pingRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest ('MtStatus :: MediaType Type) 'RW Bool
- GitHub: publicOrganizationR :: Name Organization -> Request k Organization
+ GitHub: publicOrganizationR :: forall (k :: RW). Name Organization -> Request k Organization
- GitHub: publicOrganizationsForR :: Name User -> FetchCount -> Request k (Vector SimpleOrganization)
+ GitHub: publicOrganizationsForR :: forall (k :: RW). Name User -> FetchCount -> Request k (Vector SimpleOrganization)
- GitHub: pullRequestCommentR :: Name Owner -> Name Repo -> Id Comment -> Request k Comment
+ GitHub: pullRequestCommentR :: forall (k :: RW). Name Owner -> Name Repo -> Id Comment -> Request k Comment
- GitHub: pullRequestCommentsR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Comment)
+ GitHub: pullRequestCommentsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Comment)
- GitHub: pullRequestCommitsR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Commit)
+ GitHub: pullRequestCommitsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Commit)
- GitHub: pullRequestDiffR :: Name Owner -> Name Repo -> IssueNumber -> GenRequest 'MtDiff rw ByteString
+ GitHub: pullRequestDiffR :: forall (rw :: RW). Name Owner -> Name Repo -> IssueNumber -> GenRequest ('MtDiff :: MediaType Type) rw ByteString
- GitHub: pullRequestFilesR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector File)
+ GitHub: pullRequestFilesR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector File)
- GitHub: pullRequestPatchR :: Name Owner -> Name Repo -> IssueNumber -> GenRequest 'MtPatch rw ByteString
+ GitHub: pullRequestPatchR :: forall (rw :: RW). Name Owner -> Name Repo -> IssueNumber -> GenRequest ('MtPatch :: MediaType Type) rw ByteString
- GitHub: pullRequestR :: Name Owner -> Name Repo -> IssueNumber -> Request k PullRequest
+ GitHub: pullRequestR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> Request k PullRequest
- GitHub: pullRequestReviewCommentsR :: Name Owner -> Name Repo -> IssueNumber -> Id Review -> Request k [ReviewComment]
+ GitHub: pullRequestReviewCommentsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> Id Review -> Request k [ReviewComment]
- GitHub: pullRequestReviewR :: Name Owner -> Name Repo -> IssueNumber -> Id Review -> Request k Review
+ GitHub: pullRequestReviewR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> Id Review -> Request k Review
- GitHub: pullRequestReviewsR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Review)
+ GitHub: pullRequestReviewsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Review)
- GitHub: pullRequestsForR :: Name Owner -> Name Repo -> PullRequestMod -> FetchCount -> Request k (Vector SimplePullRequest)
+ GitHub: pullRequestsForR :: forall (k :: RW). Name Owner -> Name Repo -> PullRequestMod -> FetchCount -> Request k (Vector SimplePullRequest)
- GitHub: rateLimitR :: Request k RateLimit
+ GitHub: rateLimitR :: forall (k :: RW). Request k RateLimit
- GitHub: reRunFailedJobsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub: reRunFailedJobsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: reRunJobR :: Name Owner -> Name Repo -> Id Job -> GenRequest 'MtUnit 'RW ()
+ GitHub: reRunJobR :: Name Owner -> Name Repo -> Id Job -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: reRunWorkflowR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub: reRunWorkflowR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: readmeForR :: Name Owner -> Name Repo -> Request k Content
+ GitHub: readmeForR :: forall (k :: RW). Name Owner -> Name Repo -> Request k Content
- GitHub: referenceR :: Name Owner -> Name Repo -> Name GitReference -> Request k GitReference
+ GitHub: referenceR :: forall (k :: RW). Name Owner -> Name Repo -> Name GitReference -> Request k GitReference
- GitHub: referencesR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector GitReference)
+ GitHub: referencesR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector GitReference)
- GitHub: releaseByTagNameR :: Name Owner -> Name Repo -> Text -> Request k Release
+ GitHub: releaseByTagNameR :: forall (k :: RW). Name Owner -> Name Repo -> Text -> Request k Release
- GitHub: releaseR :: Name Owner -> Name Repo -> Id Release -> Request k Release
+ GitHub: releaseR :: forall (k :: RW). Name Owner -> Name Repo -> Id Release -> Request k Release
- GitHub: releasesR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Release)
+ GitHub: releasesR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Release)
- GitHub: removeAllLabelsFromIssueR :: Name Owner -> Name Repo -> Id Issue -> GenRequest 'MtUnit 'RW ()
+ GitHub: removeAllLabelsFromIssueR :: Name Owner -> Name Repo -> Id Issue -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: removeLabelFromIssueR :: Name Owner -> Name Repo -> Id Issue -> Name IssueLabel -> GenRequest 'MtUnit 'RW ()
+ GitHub: removeLabelFromIssueR :: Name Owner -> Name Repo -> Id Issue -> Name IssueLabel -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: removeOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> Id Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub: removeOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> Id Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: repoPublicKeyR :: Name Owner -> Name Organization -> GenRequest 'MtJSON 'RA PublicKey
+ GitHub: repoPublicKeyR :: Name Owner -> Name Organization -> GenRequest ('MtJSON :: MediaType Type) 'RA PublicKey
- GitHub: repoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> GenRequest 'MtJSON 'RA RepoSecret
+ GitHub: repoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> GenRequest ('MtJSON :: MediaType Type) 'RA RepoSecret
- GitHub: repoSecretsR :: Name Owner -> Name Repo -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount RepoSecret)
+ GitHub: repoSecretsR :: Name Owner -> Name Repo -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount RepoSecret)
- GitHub: reposStarredByR :: Name Owner -> FetchCount -> Request k (Vector Repo)
+ GitHub: reposStarredByR :: forall (k :: RW). Name Owner -> FetchCount -> Request k (Vector Repo)
- GitHub: reposWatchedByR :: Name Owner -> FetchCount -> Request k (Vector Repo)
+ GitHub: reposWatchedByR :: forall (k :: RW). Name Owner -> FetchCount -> Request k (Vector Repo)
- GitHub: repositoryR :: Name Owner -> Name Repo -> Request k Repo
+ GitHub: repositoryR :: forall (k :: RW). Name Owner -> Name Repo -> Request k Repo
- GitHub: repositoryWorkflowsR :: Name Owner -> Name Repo -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount Workflow)
+ GitHub: repositoryWorkflowsR :: Name Owner -> Name Repo -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount Workflow)
- GitHub: searchCodeR :: Text -> FetchCount -> Request k (SearchResult Code)
+ GitHub: searchCodeR :: forall (k :: RW). Text -> FetchCount -> Request k (SearchResult Code)
- GitHub: searchIssuesR :: Text -> FetchCount -> Request k (SearchResult Issue)
+ GitHub: searchIssuesR :: forall (k :: RW). Text -> FetchCount -> Request k (SearchResult Issue)
- GitHub: searchReposR :: Text -> FetchCount -> Request k (SearchResult Repo)
+ GitHub: searchReposR :: forall (k :: RW). Text -> FetchCount -> Request k (SearchResult Repo)
- GitHub: searchUsersR :: Text -> FetchCount -> Request k (SearchResult SimpleUser)
+ GitHub: searchUsersR :: forall (k :: RW). Text -> FetchCount -> Request k (SearchResult SimpleUser)
- GitHub: setEnvironmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> SetRepoSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub: setEnvironmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> SetRepoSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: setOrganizationSecretR :: Name Organization -> Name OrganizationSecret -> SetSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub: setOrganizationSecretR :: Name Organization -> Name OrganizationSecret -> SetSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: setOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> SetSelectedRepositories -> GenRequest 'MtUnit 'RW ()
+ GitHub: setOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> SetSelectedRepositories -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: setRepoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> SetRepoSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub: setRepoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> SetRepoSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: starGistR :: Name Gist -> GenRequest 'MtUnit 'RW ()
+ GitHub: starGistR :: Name Gist -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: starRepoR :: Name Owner -> Name Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub: starRepoR :: Name Owner -> Name Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: stargazersForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub: stargazersForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
- GitHub: tagsForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Tag)
+ GitHub: tagsForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Tag)
- GitHub: teamInfoForR :: Id Team -> Request k Team
+ GitHub: teamInfoForR :: forall (k :: RW). Id Team -> Request k Team
- GitHub: teamMembershipInfoForR :: Id Team -> Name Owner -> Request k TeamMembership
+ GitHub: teamMembershipInfoForR :: forall (k :: RW). Id Team -> Name Owner -> Request k TeamMembership
- GitHub: teamsOfR :: Name Organization -> FetchCount -> Request k (Vector SimpleTeam)
+ GitHub: teamsOfR :: forall (k :: RW). Name Organization -> FetchCount -> Request k (Vector SimpleTeam)
- GitHub: testPushRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest 'MtStatus 'RW Bool
+ GitHub: testPushRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest ('MtStatus :: MediaType Type) 'RW Bool
- GitHub: treeR :: Name Owner -> Name Repo -> Name Tree -> Request k Tree
+ GitHub: treeR :: forall (k :: RW). Name Owner -> Name Repo -> Name Tree -> Request k Tree
- GitHub: triggerWorkflowR :: (ToJSON a, IsPathPart idOrName) => Name Owner -> Name Repo -> idOrName -> CreateWorkflowDispatchEvent a -> GenRequest 'MtUnit 'RW ()
+ GitHub: triggerWorkflowR :: (ToJSON a, IsPathPart idOrName) => Name Owner -> Name Repo -> idOrName -> CreateWorkflowDispatchEvent a -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: unstarGistR :: Name Gist -> GenRequest 'MtUnit 'RW ()
+ GitHub: unstarGistR :: Name Gist -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: unstarRepoR :: Name Owner -> Name Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub: unstarRepoR :: Name Owner -> Name Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub: userInfoForR :: Name User -> Request k User
+ GitHub: userInfoForR :: forall (k :: RW). Name User -> Request k User
- GitHub: userReposR :: Name Owner -> RepoPublicity -> FetchCount -> Request k (Vector Repo)
+ GitHub: userReposR :: forall (k :: RW). Name Owner -> RepoPublicity -> FetchCount -> Request k (Vector Repo)
- GitHub: usersFollowedByR :: Name User -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub: usersFollowedByR :: forall (k :: RW). Name User -> FetchCount -> Request k (Vector SimpleUser)
- GitHub: usersFollowingR :: Name User -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub: usersFollowingR :: forall (k :: RW). Name User -> FetchCount -> Request k (Vector SimpleUser)
- GitHub: watchersForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub: watchersForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
- GitHub: webhookForR :: Name Owner -> Name Repo -> Id RepoWebhook -> Request k RepoWebhook
+ GitHub: webhookForR :: forall (k :: RW). Name Owner -> Name Repo -> Id RepoWebhook -> Request k RepoWebhook
- GitHub: webhooksForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector RepoWebhook)
+ GitHub: webhooksForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector RepoWebhook)
- GitHub: workflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest 'MtJSON 'RA Workflow
+ GitHub: workflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest ('MtJSON :: MediaType Type) 'RA Workflow
- GitHub: workflowRunAttemptR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> GenRequest 'MtJSON 'RA WorkflowRun
+ GitHub: workflowRunAttemptR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> GenRequest ('MtJSON :: MediaType Type) 'RA WorkflowRun
- GitHub: workflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtJSON 'RA WorkflowRun
+ GitHub: workflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtJSON :: MediaType Type) 'RA WorkflowRun
- GitHub: workflowRunReviewHistoryR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtJSON 'RA (Vector ReviewHistory)
+ GitHub: workflowRunReviewHistoryR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtJSON :: MediaType Type) 'RA (Vector ReviewHistory)
- GitHub: workflowRunsForWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> WorkflowRunMod -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount WorkflowRun)
+ GitHub: workflowRunsForWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> WorkflowRunMod -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount WorkflowRun)
- GitHub: workflowRunsR :: Name Owner -> Name Repo -> WorkflowRunMod -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount WorkflowRun)
+ GitHub: workflowRunsR :: Name Owner -> Name Repo -> WorkflowRunMod -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount WorkflowRun)
- GitHub.Data.Actions.WorkflowJobs: Job :: !Id Job -> !Id WorkflowRun -> !URL -> !Integer -> !Text -> !Text -> !URL -> !URL -> !Text -> !Text -> !UTCTime -> !UTCTime -> !Vector JobStep -> !URL -> !Vector Text -> !Integer -> !Text -> !Integer -> !Text -> Job
+ GitHub.Data.Actions.WorkflowJobs: Job :: !Id Job -> !Id WorkflowRun -> !URL -> !Integer -> !Text -> !Text -> !URL -> !URL -> !Text -> !Text -> !UTCTime -> !UTCTime -> !Name Job -> !Vector JobStep -> !URL -> !Vector Text -> !Integer -> !Text -> !Integer -> !Text -> Job
- GitHub.Data.Activities: Subject :: !Text -> !URL -> !Maybe URL -> !Text -> Subject
+ GitHub.Data.Activities: Subject :: !Text -> !Maybe URL -> !Maybe URL -> !Text -> Subject
- GitHub.Data.Activities: [subjectURL] :: Subject -> !URL
+ GitHub.Data.Activities: [subjectURL] :: Subject -> !Maybe URL
- GitHub.Data.Request: [Command] :: CommandMethod -> Paths -> ByteString -> GenRequest mt 'RW a
+ GitHub.Data.Request: [Command] :: forall (mt :: MediaType Type) a. CommandMethod -> Paths -> ByteString -> GenRequest mt 'RW a
- GitHub.Data.Request: [PagedQuery] :: (a ~ t b, Foldable t, Semigroup a) => Paths -> QueryString -> FetchCount -> GenRequest mt rw a
+ GitHub.Data.Request: [PagedQuery] :: forall a (t :: Type -> Type) b (mt :: MediaType Type) (rw :: RW). (a ~ t b, Foldable t, Semigroup a) => Paths -> QueryString -> FetchCount -> GenRequest mt rw a
- GitHub.Data.Request: [Query] :: Paths -> QueryString -> GenRequest mt rw a
+ GitHub.Data.Request: [Query] :: forall (mt :: MediaType Type) (rw :: RW) a. Paths -> QueryString -> GenRequest mt rw a
- GitHub.Data.Request: data GenRequest (mt :: MediaType (*)) (rw :: RW) a
+ GitHub.Data.Request: data GenRequest (mt :: MediaType Type) (rw :: RW) a
- GitHub.Data.Request: pagedQuery :: FromJSON a => Paths -> QueryString -> FetchCount -> Request mt (Vector a)
+ GitHub.Data.Request: pagedQuery :: forall a (mt :: RW). FromJSON a => Paths -> QueryString -> FetchCount -> Request mt (Vector a)
- GitHub.Data.Request: query :: Paths -> QueryString -> Request mt a
+ GitHub.Data.Request: query :: forall (mt :: RW) a. Paths -> QueryString -> Request mt a
- GitHub.Data.Request: type Request = GenRequest 'MtJSON
+ GitHub.Data.Request: type Request = GenRequest 'MtJSON :: MediaType Type
- GitHub.Data.Search: type SearchResult entity = SearchResult' (Vector entity)
+ GitHub.Data.Search: type SearchResult entity = SearchResult' Vector entity
- GitHub.Endpoints.Actions.Artifacts: deleteArtifactR :: Name Owner -> Name Repo -> Id Comment -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Artifacts: deleteArtifactR :: Name Owner -> Name Repo -> Id Comment -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Artifacts: downloadArtifactR :: Name Owner -> Name Repo -> Id Artifact -> GenRequest 'MtRedirect 'RW URI
+ GitHub.Endpoints.Actions.Artifacts: downloadArtifactR :: Name Owner -> Name Repo -> Id Artifact -> GenRequest ('MtRedirect :: MediaType Type) 'RW URI
- GitHub.Endpoints.Actions.Cache: cacheUsageByRepositoryR :: Name Organization -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount RepositoryCacheUsage)
+ GitHub.Endpoints.Actions.Cache: cacheUsageByRepositoryR :: Name Organization -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount RepositoryCacheUsage)
- GitHub.Endpoints.Actions.Cache: cacheUsageOrganizationR :: Name Organization -> GenRequest 'MtJSON 'RA OrganizationCacheUsage
+ GitHub.Endpoints.Actions.Cache: cacheUsageOrganizationR :: Name Organization -> GenRequest ('MtJSON :: MediaType Type) 'RA OrganizationCacheUsage
- GitHub.Endpoints.Actions.Cache: cacheUsageR :: Name Owner -> Name Repo -> Request k RepositoryCacheUsage
+ GitHub.Endpoints.Actions.Cache: cacheUsageR :: forall (k :: RW). Name Owner -> Name Repo -> Request k RepositoryCacheUsage
- GitHub.Endpoints.Actions.Cache: cachesForRepoR :: Name Owner -> Name Repo -> CacheMod -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount Cache)
+ GitHub.Endpoints.Actions.Cache: cachesForRepoR :: Name Owner -> Name Repo -> CacheMod -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount Cache)
- GitHub.Endpoints.Actions.Cache: deleteCacheR :: Name Owner -> Name Repo -> Id Cache -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Cache: deleteCacheR :: Name Owner -> Name Repo -> Id Cache -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: addOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> Id Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: addOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> Id Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: deleteEnvironmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: deleteEnvironmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: deleteOrganizationSecretR :: Name Organization -> Name OrganizationSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: deleteOrganizationSecretR :: Name Organization -> Name OrganizationSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: deleteRepoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: deleteRepoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: environmentPublicKeyR :: Id Repo -> Name Environment -> GenRequest 'MtJSON 'RA PublicKey
+ GitHub.Endpoints.Actions.Secrets: environmentPublicKeyR :: Id Repo -> Name Environment -> GenRequest ('MtJSON :: MediaType Type) 'RA PublicKey
- GitHub.Endpoints.Actions.Secrets: environmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> GenRequest 'MtJSON 'RA RepoSecret
+ GitHub.Endpoints.Actions.Secrets: environmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> GenRequest ('MtJSON :: MediaType Type) 'RA RepoSecret
- GitHub.Endpoints.Actions.Secrets: environmentSecretsR :: Id Repo -> Name Environment -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount RepoSecret)
+ GitHub.Endpoints.Actions.Secrets: environmentSecretsR :: Id Repo -> Name Environment -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount RepoSecret)
- GitHub.Endpoints.Actions.Secrets: organizationPublicKeyR :: Name Organization -> GenRequest 'MtJSON 'RA PublicKey
+ GitHub.Endpoints.Actions.Secrets: organizationPublicKeyR :: Name Organization -> GenRequest ('MtJSON :: MediaType Type) 'RA PublicKey
- GitHub.Endpoints.Actions.Secrets: organizationSecretR :: Name Organization -> Name OrganizationSecret -> GenRequest 'MtJSON 'RA OrganizationSecret
+ GitHub.Endpoints.Actions.Secrets: organizationSecretR :: Name Organization -> Name OrganizationSecret -> GenRequest ('MtJSON :: MediaType Type) 'RA OrganizationSecret
- GitHub.Endpoints.Actions.Secrets: organizationSecretsR :: Name Organization -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount OrganizationSecret)
+ GitHub.Endpoints.Actions.Secrets: organizationSecretsR :: Name Organization -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount OrganizationSecret)
- GitHub.Endpoints.Actions.Secrets: organizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount SelectedRepo)
+ GitHub.Endpoints.Actions.Secrets: organizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount SelectedRepo)
- GitHub.Endpoints.Actions.Secrets: removeOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> Id Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: removeOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> Id Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: repoPublicKeyR :: Name Owner -> Name Organization -> GenRequest 'MtJSON 'RA PublicKey
+ GitHub.Endpoints.Actions.Secrets: repoPublicKeyR :: Name Owner -> Name Organization -> GenRequest ('MtJSON :: MediaType Type) 'RA PublicKey
- GitHub.Endpoints.Actions.Secrets: repoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> GenRequest 'MtJSON 'RA RepoSecret
+ GitHub.Endpoints.Actions.Secrets: repoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> GenRequest ('MtJSON :: MediaType Type) 'RA RepoSecret
- GitHub.Endpoints.Actions.Secrets: repoSecretsR :: Name Owner -> Name Repo -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount RepoSecret)
+ GitHub.Endpoints.Actions.Secrets: repoSecretsR :: Name Owner -> Name Repo -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount RepoSecret)
- GitHub.Endpoints.Actions.Secrets: setEnvironmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> SetRepoSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: setEnvironmentSecretR :: Id Repo -> Name Environment -> Name RepoSecret -> SetRepoSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: setOrganizationSecretR :: Name Organization -> Name OrganizationSecret -> SetSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: setOrganizationSecretR :: Name Organization -> Name OrganizationSecret -> SetSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: setOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> SetSelectedRepositories -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: setOrganizationSelectedRepositoriesForSecretR :: Name Organization -> Name OrganizationSecret -> SetSelectedRepositories -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Secrets: setRepoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> SetRepoSecret -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Secrets: setRepoSecretR :: Name Owner -> Name Organization -> Name RepoSecret -> SetRepoSecret -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.WorkflowJobs: downloadJobLogsR :: Name Owner -> Name Repo -> Id Job -> GenRequest 'MtRedirect 'RO URI
+ GitHub.Endpoints.Actions.WorkflowJobs: downloadJobLogsR :: Name Owner -> Name Repo -> Id Job -> GenRequest ('MtRedirect :: MediaType Type) 'RO URI
- GitHub.Endpoints.Actions.WorkflowJobs: jobsForWorkflowRunAttemptR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount Job)
+ GitHub.Endpoints.Actions.WorkflowJobs: jobsForWorkflowRunAttemptR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount Job)
- GitHub.Endpoints.Actions.WorkflowJobs: jobsForWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount Job)
+ GitHub.Endpoints.Actions.WorkflowJobs: jobsForWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount Job)
- GitHub.Endpoints.Actions.WorkflowRuns: approveWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.WorkflowRuns: approveWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.WorkflowRuns: cancelWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.WorkflowRuns: cancelWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.WorkflowRuns: deleteWorkflowRunLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.WorkflowRuns: deleteWorkflowRunLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.WorkflowRuns: deleteWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.WorkflowRuns: deleteWorkflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.WorkflowRuns: downloadWorkflowRunAttemptLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> GenRequest 'MtRedirect 'RO URI
+ GitHub.Endpoints.Actions.WorkflowRuns: downloadWorkflowRunAttemptLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> GenRequest ('MtRedirect :: MediaType Type) 'RO URI
- GitHub.Endpoints.Actions.WorkflowRuns: downloadWorkflowRunLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtRedirect 'RA URI
+ GitHub.Endpoints.Actions.WorkflowRuns: downloadWorkflowRunLogsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtRedirect :: MediaType Type) 'RA URI
- GitHub.Endpoints.Actions.WorkflowRuns: reRunFailedJobsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.WorkflowRuns: reRunFailedJobsR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.WorkflowRuns: reRunJobR :: Name Owner -> Name Repo -> Id Job -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.WorkflowRuns: reRunJobR :: Name Owner -> Name Repo -> Id Job -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.WorkflowRuns: reRunWorkflowR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.WorkflowRuns: reRunWorkflowR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.WorkflowRuns: workflowRunAttemptR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> GenRequest 'MtJSON 'RA WorkflowRun
+ GitHub.Endpoints.Actions.WorkflowRuns: workflowRunAttemptR :: Name Owner -> Name Repo -> Id WorkflowRun -> Id RunAttempt -> GenRequest ('MtJSON :: MediaType Type) 'RA WorkflowRun
- GitHub.Endpoints.Actions.WorkflowRuns: workflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtJSON 'RA WorkflowRun
+ GitHub.Endpoints.Actions.WorkflowRuns: workflowRunR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtJSON :: MediaType Type) 'RA WorkflowRun
- GitHub.Endpoints.Actions.WorkflowRuns: workflowRunReviewHistoryR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest 'MtJSON 'RA (Vector ReviewHistory)
+ GitHub.Endpoints.Actions.WorkflowRuns: workflowRunReviewHistoryR :: Name Owner -> Name Repo -> Id WorkflowRun -> GenRequest ('MtJSON :: MediaType Type) 'RA (Vector ReviewHistory)
- GitHub.Endpoints.Actions.WorkflowRuns: workflowRunsForWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> WorkflowRunMod -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount WorkflowRun)
+ GitHub.Endpoints.Actions.WorkflowRuns: workflowRunsForWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> WorkflowRunMod -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount WorkflowRun)
- GitHub.Endpoints.Actions.WorkflowRuns: workflowRunsR :: Name Owner -> Name Repo -> WorkflowRunMod -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount WorkflowRun)
+ GitHub.Endpoints.Actions.WorkflowRuns: workflowRunsR :: Name Owner -> Name Repo -> WorkflowRunMod -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount WorkflowRun)
- GitHub.Endpoints.Actions.Workflows: disableWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Workflows: disableWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Workflows: enableWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Workflows: enableWorkflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Workflows: repositoryWorkflowsR :: Name Owner -> Name Repo -> FetchCount -> GenRequest 'MtJSON 'RA (WithTotalCount Workflow)
+ GitHub.Endpoints.Actions.Workflows: repositoryWorkflowsR :: Name Owner -> Name Repo -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) 'RA (WithTotalCount Workflow)
- GitHub.Endpoints.Actions.Workflows: triggerWorkflowR :: (ToJSON a, IsPathPart idOrName) => Name Owner -> Name Repo -> idOrName -> CreateWorkflowDispatchEvent a -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Actions.Workflows: triggerWorkflowR :: (ToJSON a, IsPathPart idOrName) => Name Owner -> Name Repo -> idOrName -> CreateWorkflowDispatchEvent a -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Actions.Workflows: workflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest 'MtJSON 'RA Workflow
+ GitHub.Endpoints.Actions.Workflows: workflowR :: IsPathPart idOrName => Name Owner -> Name Repo -> idOrName -> GenRequest ('MtJSON :: MediaType Type) 'RA Workflow
- GitHub.Endpoints.Activity.Notifications: markAllNotificationsAsReadR :: GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Activity.Notifications: markAllNotificationsAsReadR :: GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Activity.Notifications: markNotificationAsReadR :: Id Notification -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Activity.Notifications: markNotificationAsReadR :: Id Notification -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Activity.Starring: myStarredAcceptStarR :: FetchCount -> GenRequest 'MtStar 'RA (Vector RepoStarred)
+ GitHub.Endpoints.Activity.Starring: myStarredAcceptStarR :: FetchCount -> GenRequest ('MtStar :: MediaType Type) 'RA (Vector RepoStarred)
- GitHub.Endpoints.Activity.Starring: reposStarredByR :: Name Owner -> FetchCount -> Request k (Vector Repo)
+ GitHub.Endpoints.Activity.Starring: reposStarredByR :: forall (k :: RW). Name Owner -> FetchCount -> Request k (Vector Repo)
- GitHub.Endpoints.Activity.Starring: starRepoR :: Name Owner -> Name Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Activity.Starring: starRepoR :: Name Owner -> Name Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Activity.Starring: stargazersForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub.Endpoints.Activity.Starring: stargazersForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
- GitHub.Endpoints.Activity.Starring: unstarRepoR :: Name Owner -> Name Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Activity.Starring: unstarRepoR :: Name Owner -> Name Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Activity.Watching: reposWatchedByR :: Name Owner -> FetchCount -> Request k (Vector Repo)
+ GitHub.Endpoints.Activity.Watching: reposWatchedByR :: forall (k :: RW). Name Owner -> FetchCount -> Request k (Vector Repo)
- GitHub.Endpoints.Activity.Watching: watchersForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub.Endpoints.Activity.Watching: watchersForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
- GitHub.Endpoints.Gists: deleteGistR :: Name Gist -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Gists: deleteGistR :: Name Gist -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Gists: gistR :: Name Gist -> Request k Gist
+ GitHub.Endpoints.Gists: gistR :: forall (k :: RW). Name Gist -> Request k Gist
- GitHub.Endpoints.Gists: gistsR :: Name Owner -> FetchCount -> Request k (Vector Gist)
+ GitHub.Endpoints.Gists: gistsR :: forall (k :: RW). Name Owner -> FetchCount -> Request k (Vector Gist)
- GitHub.Endpoints.Gists: starGistR :: Name Gist -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Gists: starGistR :: Name Gist -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Gists: unstarGistR :: Name Gist -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Gists: unstarGistR :: Name Gist -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Gists.Comments: commentsOnR :: Name Gist -> FetchCount -> Request k (Vector GistComment)
+ GitHub.Endpoints.Gists.Comments: commentsOnR :: forall (k :: RW). Name Gist -> FetchCount -> Request k (Vector GistComment)
- GitHub.Endpoints.Gists.Comments: gistCommentR :: Id GistComment -> Request k GistComment
+ GitHub.Endpoints.Gists.Comments: gistCommentR :: forall (k :: RW). Id GistComment -> Request k GistComment
- GitHub.Endpoints.GitData.Blobs: blobR :: Name Owner -> Name Repo -> Name Blob -> Request k Blob
+ GitHub.Endpoints.GitData.Blobs: blobR :: forall (k :: RW). Name Owner -> Name Repo -> Name Blob -> Request k Blob
- GitHub.Endpoints.GitData.Commits: gitCommitR :: Name Owner -> Name Repo -> Name GitCommit -> Request k GitCommit
+ GitHub.Endpoints.GitData.Commits: gitCommitR :: forall (k :: RW). Name Owner -> Name Repo -> Name GitCommit -> Request k GitCommit
- GitHub.Endpoints.GitData.References: deleteReferenceR :: Name Owner -> Name Repo -> Name GitReference -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.GitData.References: deleteReferenceR :: Name Owner -> Name Repo -> Name GitReference -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.GitData.References: namespacedReferencesR :: Name Owner -> Name Repo -> Text -> Request k [GitReference]
+ GitHub.Endpoints.GitData.References: namespacedReferencesR :: forall (k :: RW). Name Owner -> Name Repo -> Text -> Request k [GitReference]
- GitHub.Endpoints.GitData.References: referenceR :: Name Owner -> Name Repo -> Name GitReference -> Request k GitReference
+ GitHub.Endpoints.GitData.References: referenceR :: forall (k :: RW). Name Owner -> Name Repo -> Name GitReference -> Request k GitReference
- GitHub.Endpoints.GitData.References: referencesR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector GitReference)
+ GitHub.Endpoints.GitData.References: referencesR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector GitReference)
- GitHub.Endpoints.GitData.Trees: nestedTreeR :: Name Owner -> Name Repo -> Name Tree -> Request k Tree
+ GitHub.Endpoints.GitData.Trees: nestedTreeR :: forall (k :: RW). Name Owner -> Name Repo -> Name Tree -> Request k Tree
- GitHub.Endpoints.GitData.Trees: treeR :: Name Owner -> Name Repo -> Name Tree -> Request k Tree
+ GitHub.Endpoints.GitData.Trees: treeR :: forall (k :: RW). Name Owner -> Name Repo -> Name Tree -> Request k Tree
- GitHub.Endpoints.Issues: issueR :: Name Owner -> Name Repo -> IssueNumber -> Request k Issue
+ GitHub.Endpoints.Issues: issueR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> Request k Issue
- GitHub.Endpoints.Issues: issuesForRepoR :: Name Owner -> Name Repo -> IssueRepoMod -> FetchCount -> Request k (Vector Issue)
+ GitHub.Endpoints.Issues: issuesForRepoR :: forall (k :: RW). Name Owner -> Name Repo -> IssueRepoMod -> FetchCount -> Request k (Vector Issue)
- GitHub.Endpoints.Issues: organizationIssuesR :: Name Organization -> IssueMod -> FetchCount -> Request k (Vector Issue)
+ GitHub.Endpoints.Issues: organizationIssuesR :: forall (k :: RW). Name Organization -> IssueMod -> FetchCount -> Request k (Vector Issue)
- GitHub.Endpoints.Issues.Comments: commentR :: Name Owner -> Name Repo -> Id Comment -> Request k IssueComment
+ GitHub.Endpoints.Issues.Comments: commentR :: forall (k :: RW). Name Owner -> Name Repo -> Id Comment -> Request k IssueComment
- GitHub.Endpoints.Issues.Comments: commentsR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector IssueComment)
+ GitHub.Endpoints.Issues.Comments: commentsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector IssueComment)
- GitHub.Endpoints.Issues.Comments: deleteCommentR :: Name Owner -> Name Repo -> Id Comment -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Issues.Comments: deleteCommentR :: Name Owner -> Name Repo -> Id Comment -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Issues.Events: eventR :: Name Owner -> Name Repo -> Id IssueEvent -> Request k IssueEvent
+ GitHub.Endpoints.Issues.Events: eventR :: forall (k :: RW). Name Owner -> Name Repo -> Id IssueEvent -> Request k IssueEvent
- GitHub.Endpoints.Issues.Events: eventsForIssueR :: Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector IssueEvent)
+ GitHub.Endpoints.Issues.Events: eventsForIssueR :: forall (k :: RW). Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector IssueEvent)
- GitHub.Endpoints.Issues.Events: eventsForRepoR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector IssueEvent)
+ GitHub.Endpoints.Issues.Events: eventsForRepoR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector IssueEvent)
- GitHub.Endpoints.Issues.Labels: deleteLabelR :: Name Owner -> Name Repo -> Name IssueLabel -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Issues.Labels: deleteLabelR :: Name Owner -> Name Repo -> Name IssueLabel -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Issues.Labels: labelR :: Name Owner -> Name Repo -> Name IssueLabel -> Request k IssueLabel
+ GitHub.Endpoints.Issues.Labels: labelR :: forall (k :: RW). Name Owner -> Name Repo -> Name IssueLabel -> Request k IssueLabel
- GitHub.Endpoints.Issues.Labels: labelsOnIssueR :: Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector IssueLabel)
+ GitHub.Endpoints.Issues.Labels: labelsOnIssueR :: forall (k :: RW). Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector IssueLabel)
- GitHub.Endpoints.Issues.Labels: labelsOnMilestoneR :: Name Owner -> Name Repo -> Id Milestone -> FetchCount -> Request k (Vector IssueLabel)
+ GitHub.Endpoints.Issues.Labels: labelsOnMilestoneR :: forall (k :: RW). Name Owner -> Name Repo -> Id Milestone -> FetchCount -> Request k (Vector IssueLabel)
- GitHub.Endpoints.Issues.Labels: labelsOnRepoR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector IssueLabel)
+ GitHub.Endpoints.Issues.Labels: labelsOnRepoR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector IssueLabel)
- GitHub.Endpoints.Issues.Labels: removeAllLabelsFromIssueR :: Name Owner -> Name Repo -> Id Issue -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Issues.Labels: removeAllLabelsFromIssueR :: Name Owner -> Name Repo -> Id Issue -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Issues.Labels: removeLabelFromIssueR :: Name Owner -> Name Repo -> Id Issue -> Name IssueLabel -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Issues.Labels: removeLabelFromIssueR :: Name Owner -> Name Repo -> Id Issue -> Name IssueLabel -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Issues.Milestones: deleteMilestoneR :: Name Owner -> Name Repo -> Id Milestone -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Issues.Milestones: deleteMilestoneR :: Name Owner -> Name Repo -> Id Milestone -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Issues.Milestones: milestoneR :: Name Owner -> Name Repo -> Id Milestone -> Request k Milestone
+ GitHub.Endpoints.Issues.Milestones: milestoneR :: forall (k :: RW). Name Owner -> Name Repo -> Id Milestone -> Request k Milestone
- GitHub.Endpoints.Issues.Milestones: milestonesR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Milestone)
+ GitHub.Endpoints.Issues.Milestones: milestonesR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Milestone)
- GitHub.Endpoints.Organizations: organizationsR :: FetchCount -> Request k (Vector SimpleOrganization)
+ GitHub.Endpoints.Organizations: organizationsR :: forall (k :: RW). FetchCount -> Request k (Vector SimpleOrganization)
- GitHub.Endpoints.Organizations: publicOrganizationR :: Name Organization -> Request k Organization
+ GitHub.Endpoints.Organizations: publicOrganizationR :: forall (k :: RW). Name Organization -> Request k Organization
- GitHub.Endpoints.Organizations: publicOrganizationsForR :: Name User -> FetchCount -> Request k (Vector SimpleOrganization)
+ GitHub.Endpoints.Organizations: publicOrganizationsForR :: forall (k :: RW). Name User -> FetchCount -> Request k (Vector SimpleOrganization)
- GitHub.Endpoints.Organizations.Members: isMemberOfR :: Name User -> Name Organization -> GenRequest 'MtStatus rw Bool
+ GitHub.Endpoints.Organizations.Members: isMemberOfR :: forall (rw :: RW). Name User -> Name Organization -> GenRequest ('MtStatus :: MediaType Type) rw Bool
- GitHub.Endpoints.Organizations.Members: membersOfR :: Name Organization -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub.Endpoints.Organizations.Members: membersOfR :: forall (k :: RW). Name Organization -> FetchCount -> Request k (Vector SimpleUser)
- GitHub.Endpoints.Organizations.Members: membersOfWithR :: Name Organization -> OrgMemberFilter -> OrgMemberRole -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub.Endpoints.Organizations.Members: membersOfWithR :: forall (k :: RW). Name Organization -> OrgMemberFilter -> OrgMemberRole -> FetchCount -> Request k (Vector SimpleUser)
- GitHub.Endpoints.Organizations.OutsideCollaborators: outsideCollaboratorsR :: Name Organization -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub.Endpoints.Organizations.OutsideCollaborators: outsideCollaboratorsR :: forall (k :: RW). Name Organization -> FetchCount -> Request k (Vector SimpleUser)
- GitHub.Endpoints.Organizations.Teams: addOrUpdateTeamRepoR :: Id Team -> Name Organization -> Name Repo -> Permission -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Organizations.Teams: addOrUpdateTeamRepoR :: Id Team -> Name Organization -> Name Repo -> Permission -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Organizations.Teams: deleteTeamMembershipForR :: Id Team -> Name Owner -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Organizations.Teams: deleteTeamMembershipForR :: Id Team -> Name Owner -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Organizations.Teams: deleteTeamR :: Id Team -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Organizations.Teams: deleteTeamR :: Id Team -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Organizations.Teams: listTeamReposR :: Id Team -> FetchCount -> Request k (Vector Repo)
+ GitHub.Endpoints.Organizations.Teams: listTeamReposR :: forall (k :: RW). Id Team -> FetchCount -> Request k (Vector Repo)
- GitHub.Endpoints.Organizations.Teams: teamInfoForR :: Id Team -> Request k Team
+ GitHub.Endpoints.Organizations.Teams: teamInfoForR :: forall (k :: RW). Id Team -> Request k Team
- GitHub.Endpoints.Organizations.Teams: teamMembershipInfoForR :: Id Team -> Name Owner -> Request k TeamMembership
+ GitHub.Endpoints.Organizations.Teams: teamMembershipInfoForR :: forall (k :: RW). Id Team -> Name Owner -> Request k TeamMembership
- GitHub.Endpoints.Organizations.Teams: teamsOfR :: Name Organization -> FetchCount -> Request k (Vector SimpleTeam)
+ GitHub.Endpoints.Organizations.Teams: teamsOfR :: forall (k :: RW). Name Organization -> FetchCount -> Request k (Vector SimpleTeam)
- GitHub.Endpoints.PullRequests: isPullRequestMergedR :: Name Owner -> Name Repo -> IssueNumber -> GenRequest 'MtStatus rw Bool
+ GitHub.Endpoints.PullRequests: isPullRequestMergedR :: forall (rw :: RW). Name Owner -> Name Repo -> IssueNumber -> GenRequest ('MtStatus :: MediaType Type) rw Bool
- GitHub.Endpoints.PullRequests: mergePullRequestR :: Name Owner -> Name Repo -> IssueNumber -> Maybe Text -> GenRequest 'MtStatus 'RW MergeResult
+ GitHub.Endpoints.PullRequests: mergePullRequestR :: Name Owner -> Name Repo -> IssueNumber -> Maybe Text -> GenRequest ('MtStatus :: MediaType Type) 'RW MergeResult
- GitHub.Endpoints.PullRequests: pullRequestCommitsR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Commit)
+ GitHub.Endpoints.PullRequests: pullRequestCommitsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Commit)
- GitHub.Endpoints.PullRequests: pullRequestDiffR :: Name Owner -> Name Repo -> IssueNumber -> GenRequest 'MtDiff rw ByteString
+ GitHub.Endpoints.PullRequests: pullRequestDiffR :: forall (rw :: RW). Name Owner -> Name Repo -> IssueNumber -> GenRequest ('MtDiff :: MediaType Type) rw ByteString
- GitHub.Endpoints.PullRequests: pullRequestFilesR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector File)
+ GitHub.Endpoints.PullRequests: pullRequestFilesR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector File)
- GitHub.Endpoints.PullRequests: pullRequestPatchR :: Name Owner -> Name Repo -> IssueNumber -> GenRequest 'MtPatch rw ByteString
+ GitHub.Endpoints.PullRequests: pullRequestPatchR :: forall (rw :: RW). Name Owner -> Name Repo -> IssueNumber -> GenRequest ('MtPatch :: MediaType Type) rw ByteString
- GitHub.Endpoints.PullRequests: pullRequestR :: Name Owner -> Name Repo -> IssueNumber -> Request k PullRequest
+ GitHub.Endpoints.PullRequests: pullRequestR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> Request k PullRequest
- GitHub.Endpoints.PullRequests: pullRequestsForR :: Name Owner -> Name Repo -> PullRequestMod -> FetchCount -> Request k (Vector SimplePullRequest)
+ GitHub.Endpoints.PullRequests: pullRequestsForR :: forall (k :: RW). Name Owner -> Name Repo -> PullRequestMod -> FetchCount -> Request k (Vector SimplePullRequest)
- GitHub.Endpoints.PullRequests.Comments: pullRequestCommentR :: Name Owner -> Name Repo -> Id Comment -> Request k Comment
+ GitHub.Endpoints.PullRequests.Comments: pullRequestCommentR :: forall (k :: RW). Name Owner -> Name Repo -> Id Comment -> Request k Comment
- GitHub.Endpoints.PullRequests.Comments: pullRequestCommentsR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Comment)
+ GitHub.Endpoints.PullRequests.Comments: pullRequestCommentsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Comment)
- GitHub.Endpoints.PullRequests.Reviews: pullRequestReviewCommentsR :: Name Owner -> Name Repo -> IssueNumber -> Id Review -> Request k [ReviewComment]
+ GitHub.Endpoints.PullRequests.Reviews: pullRequestReviewCommentsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> Id Review -> Request k [ReviewComment]
- GitHub.Endpoints.PullRequests.Reviews: pullRequestReviewR :: Name Owner -> Name Repo -> IssueNumber -> Id Review -> Request k Review
+ GitHub.Endpoints.PullRequests.Reviews: pullRequestReviewR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> Id Review -> Request k Review
- GitHub.Endpoints.PullRequests.Reviews: pullRequestReviewsR :: Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Review)
+ GitHub.Endpoints.PullRequests.Reviews: pullRequestReviewsR :: forall (k :: RW). Name Owner -> Name Repo -> IssueNumber -> FetchCount -> Request k (Vector Review)
- GitHub.Endpoints.RateLimit: rateLimitR :: Request k RateLimit
+ GitHub.Endpoints.RateLimit: rateLimitR :: forall (k :: RW). Request k RateLimit
- GitHub.Endpoints.Repos: branchesForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Branch)
+ GitHub.Endpoints.Repos: branchesForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Branch)
- GitHub.Endpoints.Repos: contributorsR :: Name Owner -> Name Repo -> Bool -> FetchCount -> Request k (Vector Contributor)
+ GitHub.Endpoints.Repos: contributorsR :: forall (k :: RW). Name Owner -> Name Repo -> Bool -> FetchCount -> Request k (Vector Contributor)
- GitHub.Endpoints.Repos: currentUserReposR :: RepoPublicity -> FetchCount -> Request k (Vector Repo)
+ GitHub.Endpoints.Repos: currentUserReposR :: forall (k :: RW). RepoPublicity -> FetchCount -> Request k (Vector Repo)
- GitHub.Endpoints.Repos: deleteRepoR :: Name Owner -> Name Repo -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Repos: deleteRepoR :: Name Owner -> Name Repo -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Repos: languagesForR :: Name Owner -> Name Repo -> Request k Languages
+ GitHub.Endpoints.Repos: languagesForR :: forall (k :: RW). Name Owner -> Name Repo -> Request k Languages
- GitHub.Endpoints.Repos: organizationReposR :: Name Organization -> RepoPublicity -> FetchCount -> Request k (Vector Repo)
+ GitHub.Endpoints.Repos: organizationReposR :: forall (k :: RW). Name Organization -> RepoPublicity -> FetchCount -> Request k (Vector Repo)
- GitHub.Endpoints.Repos: repositoryR :: Name Owner -> Name Repo -> Request k Repo
+ GitHub.Endpoints.Repos: repositoryR :: forall (k :: RW). Name Owner -> Name Repo -> Request k Repo
- GitHub.Endpoints.Repos: tagsForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Tag)
+ GitHub.Endpoints.Repos: tagsForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Tag)
- GitHub.Endpoints.Repos: userReposR :: Name Owner -> RepoPublicity -> FetchCount -> Request k (Vector Repo)
+ GitHub.Endpoints.Repos: userReposR :: forall (k :: RW). Name Owner -> RepoPublicity -> FetchCount -> Request k (Vector Repo)
- GitHub.Endpoints.Repos.Collaborators: addCollaboratorR :: Name Owner -> Name Repo -> Name User -> GenRequest 'MtJSON 'RW (Maybe RepoInvitation)
+ GitHub.Endpoints.Repos.Collaborators: addCollaboratorR :: Name Owner -> Name Repo -> Name User -> GenRequest ('MtJSON :: MediaType Type) 'RW (Maybe RepoInvitation)
- GitHub.Endpoints.Repos.Collaborators: collaboratorPermissionOnR :: Name Owner -> Name Repo -> Name User -> GenRequest 'MtJSON rw CollaboratorWithPermission
+ GitHub.Endpoints.Repos.Collaborators: collaboratorPermissionOnR :: forall (rw :: RW). Name Owner -> Name Repo -> Name User -> GenRequest ('MtJSON :: MediaType Type) rw CollaboratorWithPermission
- GitHub.Endpoints.Repos.Collaborators: collaboratorsOnR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub.Endpoints.Repos.Collaborators: collaboratorsOnR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector SimpleUser)
- GitHub.Endpoints.Repos.Collaborators: isCollaboratorOnR :: Name Owner -> Name Repo -> Name User -> GenRequest 'MtStatus rw Bool
+ GitHub.Endpoints.Repos.Collaborators: isCollaboratorOnR :: forall (rw :: RW). Name Owner -> Name Repo -> Name User -> GenRequest ('MtStatus :: MediaType Type) rw Bool
- GitHub.Endpoints.Repos.Comments: commentsForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Comment)
+ GitHub.Endpoints.Repos.Comments: commentsForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Comment)
- GitHub.Endpoints.Repos.Comments: commitCommentForR :: Name Owner -> Name Repo -> Id Comment -> Request k Comment
+ GitHub.Endpoints.Repos.Comments: commitCommentForR :: forall (k :: RW). Name Owner -> Name Repo -> Id Comment -> Request k Comment
- GitHub.Endpoints.Repos.Comments: commitCommentsForR :: Name Owner -> Name Repo -> Name Commit -> FetchCount -> Request k (Vector Comment)
+ GitHub.Endpoints.Repos.Comments: commitCommentsForR :: forall (k :: RW). Name Owner -> Name Repo -> Name Commit -> FetchCount -> Request k (Vector Comment)
- GitHub.Endpoints.Repos.Commits: commitR :: Name Owner -> Name Repo -> Name Commit -> Request k Commit
+ GitHub.Endpoints.Repos.Commits: commitR :: forall (k :: RW). Name Owner -> Name Repo -> Name Commit -> Request k Commit
- GitHub.Endpoints.Repos.Commits: commitsForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Commit)
+ GitHub.Endpoints.Repos.Commits: commitsForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Commit)
- GitHub.Endpoints.Repos.Commits: commitsWithOptionsForR :: Name Owner -> Name Repo -> FetchCount -> [CommitQueryOption] -> Request k (Vector Commit)
+ GitHub.Endpoints.Repos.Commits: commitsWithOptionsForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> [CommitQueryOption] -> Request k (Vector Commit)
- GitHub.Endpoints.Repos.Commits: diffR :: Name Owner -> Name Repo -> Name Commit -> Name Commit -> Request k Diff
+ GitHub.Endpoints.Repos.Commits: diffR :: forall (k :: RW). Name Owner -> Name Repo -> Name Commit -> Name Commit -> Request k Diff
- GitHub.Endpoints.Repos.Contents: archiveForR :: Name Owner -> Name Repo -> ArchiveFormat -> Maybe Text -> GenRequest 'MtRedirect rw URI
+ GitHub.Endpoints.Repos.Contents: archiveForR :: forall (rw :: RW). Name Owner -> Name Repo -> ArchiveFormat -> Maybe Text -> GenRequest ('MtRedirect :: MediaType Type) rw URI
- GitHub.Endpoints.Repos.Contents: contentsForR :: Name Owner -> Name Repo -> Text -> Maybe Text -> Request k Content
+ GitHub.Endpoints.Repos.Contents: contentsForR :: forall (k :: RW). Name Owner -> Name Repo -> Text -> Maybe Text -> Request k Content
- GitHub.Endpoints.Repos.Contents: deleteFileR :: Name Owner -> Name Repo -> DeleteFile -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Repos.Contents: deleteFileR :: Name Owner -> Name Repo -> DeleteFile -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Repos.Contents: readmeForR :: Name Owner -> Name Repo -> Request k Content
+ GitHub.Endpoints.Repos.Contents: readmeForR :: forall (k :: RW). Name Owner -> Name Repo -> Request k Content
- GitHub.Endpoints.Repos.DeployKeys: deleteRepoDeployKeyR :: Name Owner -> Name Repo -> Id RepoDeployKey -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Repos.DeployKeys: deleteRepoDeployKeyR :: Name Owner -> Name Repo -> Id RepoDeployKey -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Repos.Forks: forksForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Repo)
+ GitHub.Endpoints.Repos.Forks: forksForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Repo)
- GitHub.Endpoints.Repos.Invitations: acceptInvitationFromR :: Id RepoInvitation -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Repos.Invitations: acceptInvitationFromR :: Id RepoInvitation -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Repos.Invitations: listInvitationsForR :: FetchCount -> Request k (Vector RepoInvitation)
+ GitHub.Endpoints.Repos.Invitations: listInvitationsForR :: forall (k :: RW). FetchCount -> Request k (Vector RepoInvitation)
- GitHub.Endpoints.Repos.Invitations: listInvitationsOnR :: Name Owner -> Name Repo -> FetchCount -> GenRequest 'MtJSON k (Vector RepoInvitation)
+ GitHub.Endpoints.Repos.Invitations: listInvitationsOnR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> GenRequest ('MtJSON :: MediaType Type) k (Vector RepoInvitation)
- GitHub.Endpoints.Repos.Releases: latestReleaseR :: Name Owner -> Name Repo -> Request k Release
+ GitHub.Endpoints.Repos.Releases: latestReleaseR :: forall (k :: RW). Name Owner -> Name Repo -> Request k Release
- GitHub.Endpoints.Repos.Releases: releaseByTagNameR :: Name Owner -> Name Repo -> Text -> Request k Release
+ GitHub.Endpoints.Repos.Releases: releaseByTagNameR :: forall (k :: RW). Name Owner -> Name Repo -> Text -> Request k Release
- GitHub.Endpoints.Repos.Releases: releaseR :: Name Owner -> Name Repo -> Id Release -> Request k Release
+ GitHub.Endpoints.Repos.Releases: releaseR :: forall (k :: RW). Name Owner -> Name Repo -> Id Release -> Request k Release
- GitHub.Endpoints.Repos.Releases: releasesR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector Release)
+ GitHub.Endpoints.Repos.Releases: releasesR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector Release)
- GitHub.Endpoints.Repos.Webhooks: deleteRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Repos.Webhooks: deleteRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Endpoints.Repos.Webhooks: pingRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest 'MtStatus 'RW Bool
+ GitHub.Endpoints.Repos.Webhooks: pingRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest ('MtStatus :: MediaType Type) 'RW Bool
- GitHub.Endpoints.Repos.Webhooks: testPushRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest 'MtStatus 'RW Bool
+ GitHub.Endpoints.Repos.Webhooks: testPushRepoWebhookR :: Name Owner -> Name Repo -> Id RepoWebhook -> GenRequest ('MtStatus :: MediaType Type) 'RW Bool
- GitHub.Endpoints.Repos.Webhooks: webhookForR :: Name Owner -> Name Repo -> Id RepoWebhook -> Request k RepoWebhook
+ GitHub.Endpoints.Repos.Webhooks: webhookForR :: forall (k :: RW). Name Owner -> Name Repo -> Id RepoWebhook -> Request k RepoWebhook
- GitHub.Endpoints.Repos.Webhooks: webhooksForR :: Name Owner -> Name Repo -> FetchCount -> Request k (Vector RepoWebhook)
+ GitHub.Endpoints.Repos.Webhooks: webhooksForR :: forall (k :: RW). Name Owner -> Name Repo -> FetchCount -> Request k (Vector RepoWebhook)
- GitHub.Endpoints.Search: searchCodeR :: Text -> FetchCount -> Request k (SearchResult Code)
+ GitHub.Endpoints.Search: searchCodeR :: forall (k :: RW). Text -> FetchCount -> Request k (SearchResult Code)
- GitHub.Endpoints.Search: searchIssuesR :: Text -> FetchCount -> Request k (SearchResult Issue)
+ GitHub.Endpoints.Search: searchIssuesR :: forall (k :: RW). Text -> FetchCount -> Request k (SearchResult Issue)
- GitHub.Endpoints.Search: searchReposR :: Text -> FetchCount -> Request k (SearchResult Repo)
+ GitHub.Endpoints.Search: searchReposR :: forall (k :: RW). Text -> FetchCount -> Request k (SearchResult Repo)
- GitHub.Endpoints.Search: searchUsersR :: Text -> FetchCount -> Request k (SearchResult SimpleUser)
+ GitHub.Endpoints.Search: searchUsersR :: forall (k :: RW). Text -> FetchCount -> Request k (SearchResult SimpleUser)
- GitHub.Endpoints.Users: ownerInfoForR :: Name Owner -> Request k Owner
+ GitHub.Endpoints.Users: ownerInfoForR :: forall (k :: RW). Name Owner -> Request k Owner
- GitHub.Endpoints.Users: userInfoForR :: Name User -> Request k User
+ GitHub.Endpoints.Users: userInfoForR :: forall (k :: RW). Name User -> Request k User
- GitHub.Endpoints.Users.Followers: usersFollowedByR :: Name User -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub.Endpoints.Users.Followers: usersFollowedByR :: forall (k :: RW). Name User -> FetchCount -> Request k (Vector SimpleUser)
- GitHub.Endpoints.Users.Followers: usersFollowingR :: Name User -> FetchCount -> Request k (Vector SimpleUser)
+ GitHub.Endpoints.Users.Followers: usersFollowingR :: forall (k :: RW). Name User -> FetchCount -> Request k (Vector SimpleUser)
- GitHub.Endpoints.Users.PublicSSHKeys: deleteUserPublicSSHKeyR :: Id PublicSSHKey -> GenRequest 'MtUnit 'RW ()
+ GitHub.Endpoints.Users.PublicSSHKeys: deleteUserPublicSSHKeyR :: Id PublicSSHKey -> GenRequest ('MtUnit :: MediaType Type) 'RW ()
- GitHub.Internal.Prelude: (.=) :: (KeyValue kv, ToJSON v) => Key -> v -> kv
+ GitHub.Internal.Prelude: (.=) :: (KeyValue e kv, ToJSON v) => Key -> v -> kv
- GitHub.Internal.Prelude: infixr 8 ^
+ GitHub.Internal.Prelude: infixr 8 .=
- GitHub.Request: [Command] :: CommandMethod -> Paths -> ByteString -> GenRequest mt 'RW a
+ GitHub.Request: [Command] :: forall (mt :: MediaType Type) a. CommandMethod -> Paths -> ByteString -> GenRequest mt 'RW a
- GitHub.Request: [PagedQuery] :: (a ~ t b, Foldable t, Semigroup a) => Paths -> QueryString -> FetchCount -> GenRequest mt rw a
+ GitHub.Request: [PagedQuery] :: forall a (t :: Type -> Type) b (mt :: MediaType Type) (rw :: RW). (a ~ t b, Foldable t, Semigroup a) => Paths -> QueryString -> FetchCount -> GenRequest mt rw a
- GitHub.Request: [Query] :: Paths -> QueryString -> GenRequest mt rw a
+ GitHub.Request: [Query] :: forall (mt :: MediaType Type) (rw :: RW) a. Paths -> QueryString -> GenRequest mt rw a
- GitHub.Request: class Accept (mt :: MediaType (*))
+ GitHub.Request: class Accept (mt :: MediaType Type)
- GitHub.Request: class Accept mt => ParseResponse (mt :: MediaType (*)) a
+ GitHub.Request: class Accept mt => ParseResponse (mt :: MediaType Type) a
- GitHub.Request: data GenRequest (mt :: MediaType (*)) (rw :: RW) a
+ GitHub.Request: data GenRequest (mt :: MediaType Type) (rw :: RW) a
- GitHub.Request: executeRequest :: (AuthMethod am, ParseResponse mt a) => am -> GenRequest mt rw a -> IO (Either Error a)
+ GitHub.Request: executeRequest :: forall am (mt :: MediaType Type) a (rw :: RW). (AuthMethod am, ParseResponse mt a) => am -> GenRequest mt rw a -> IO (Either Error a)
- GitHub.Request: executeRequest' :: ParseResponse mt a => GenRequest mt 'RO a -> IO (Either Error a)
+ GitHub.Request: executeRequest' :: forall (mt :: MediaType Type) a. ParseResponse mt a => GenRequest mt 'RO a -> IO (Either Error a)
- GitHub.Request: executeRequestMaybe :: (AuthMethod am, ParseResponse mt a) => Maybe am -> GenRequest mt 'RO a -> IO (Either Error a)
+ GitHub.Request: executeRequestMaybe :: forall am (mt :: MediaType Type) a. (AuthMethod am, ParseResponse mt a) => Maybe am -> GenRequest mt 'RO a -> IO (Either Error a)
- GitHub.Request: executeRequestWithMgr :: (AuthMethod am, ParseResponse mt a) => Manager -> am -> GenRequest mt rw a -> IO (Either Error a)
+ GitHub.Request: executeRequestWithMgr :: forall am (mt :: MediaType Type) a (rw :: RW). (AuthMethod am, ParseResponse mt a) => Manager -> am -> GenRequest mt rw a -> IO (Either Error a)
- GitHub.Request: executeRequestWithMgr' :: ParseResponse mt a => Manager -> GenRequest mt 'RO a -> IO (Either Error a)
+ GitHub.Request: executeRequestWithMgr' :: forall (mt :: MediaType Type) a. ParseResponse mt a => Manager -> GenRequest mt 'RO a -> IO (Either Error a)
- GitHub.Request: executeRequestWithMgrAndRes :: (AuthMethod am, ParseResponse mt a) => Manager -> am -> GenRequest mt rw a -> IO (Either Error (Response a))
+ GitHub.Request: executeRequestWithMgrAndRes :: forall am (mt :: MediaType Type) a (rw :: RW). (AuthMethod am, ParseResponse mt a) => Manager -> am -> GenRequest mt rw a -> IO (Either Error (Response a))
- GitHub.Request: makeHttpRequest :: forall am mt rw a m. (AuthMethod am, MonadThrow m, Accept mt) => Maybe am -> GenRequest mt rw a -> m Request
+ GitHub.Request: makeHttpRequest :: forall am (mt :: MediaType Type) (rw :: RW) a m. (AuthMethod am, MonadThrow m, Accept mt) => Maybe am -> GenRequest mt rw a -> m Request
- GitHub.Request: performPagedRequest :: forall a m mt. (ParseResponse mt a, Semigroup a, MonadCatch m, MonadError Error m) => (Request -> m (Response ByteString)) -> (a -> Bool) -> Request -> Tagged mt (m (Response a))
+ GitHub.Request: performPagedRequest :: forall a m (mt :: MediaType Type). (ParseResponse mt a, Semigroup a, MonadCatch m, MonadError Error m) => (Request -> m (Response ByteString)) -> (a -> Bool) -> Request -> Tagged mt (m (Response a))
- GitHub.Request: type Request = GenRequest 'MtJSON
+ GitHub.Request: type Request = GenRequest 'MtJSON :: MediaType Type
- GitHub.Request: unsafeDropAuthRequirements :: GenRequest mt rw' a -> GenRequest mt rw a
+ GitHub.Request: unsafeDropAuthRequirements :: forall (mt :: MediaType Type) (rw' :: RW) a (rw :: RW). GenRequest mt rw' a -> GenRequest mt rw a
Files
- CHANGELOG.md +17/−0
- github.cabal +22/−24
- spec/GitHub/IssuesSpec.hs +26/−6
- src/GitHub.hs +11/−0
- src/GitHub/Auth.hs +7/−0
- src/GitHub/Data.hs +2/−2
- src/GitHub/Data/Actions/WorkflowJobs.hs +2/−0
- src/GitHub/Data/Activities.hs +23/−13
- src/GitHub/Data/Definitions.hs +57/−0
- src/GitHub/Data/Name.hs +0/−5
- src/GitHub/Data/Options.hs +3/−0
- src/GitHub/Data/RateLimit.hs +1/−1
- src/GitHub/Data/Reactions.hs +78/−0
- src/GitHub/Data/Repos.hs +0/−22
- src/GitHub/Data/Request.hs +38/−2
- src/GitHub/Endpoints/Issues.hs +0/−2
- src/GitHub/Endpoints/Organizations/Members.hs +8/−0
- src/GitHub/Endpoints/Reactions.hs +60/−0
- src/GitHub/Endpoints/Repos/Comments.hs +0/−2
- src/GitHub/Endpoints/Repos/Commits.hs +0/−2
- src/GitHub/Internal/Prelude.hs +1/−2
- src/GitHub/Request.hs +50/−12
CHANGELOG.md view
@@ -1,3 +1,20 @@+## Changes for 0.30++_2025-05-09, Andreas Abel, Peace edition_++- Organization membership endpoint (Domen Kožar, PR [#487](https://github.com/haskell-github/github/pull/487)).+- Allow JWT as an authentication method (Tom Sydney Kerckhove, PR [#497](https://github.com/haskell-github/github/pull/497)).+- Support pagination (Tom McLaughlin, PR [#503](https://github.com/haskell-github/github/pull/503)).+- Initial subset of Reactions endpoints (Dan Rijks, PR [#509](https://github.com/haskell-github/github/pull/509)).+- Fix `getNotifications` (maralorn, PR [#511](https://github.com/haskell-github/github/pull/511)).+- Add missing `name` field to `WorkflowJobs` `Job` type (Hugh Davidson, PR [#518](https://github.com/haskell-github/github/pull/518)).+- Add `StateReasonDuplicate` to `IssueStateReason` (PR [#523](https://github.com/haskell-github/github/pull/523)).+- Drop support for GHC 8.0 and below.+- Drop dependency `time-compat`.++Tested with GHC 8.2 - 9.12.2.++ ## Changes for 0.29 _2023-06-24, Andreas Abel, Midsommar edition_
github.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.4 name: github-version: 0.29+version: 0.30 synopsis: Access to the GitHub API, v3. category: Network description:@@ -30,8 +30,11 @@ Copyright 2012-2013 Mike Burns, Copyright 2013-2015 John Wiegley, Copyright 2016-2021 Oleg Grenrus tested-with:- GHC == 9.6.2- GHC == 9.4.5+ GHC == 9.12.2+ GHC == 9.10.2+ GHC == 9.8.4+ GHC == 9.6.7+ GHC == 9.4.8 GHC == 9.2.8 GHC == 9.0.2 GHC == 8.10.7@@ -39,9 +42,6 @@ GHC == 8.6.5 GHC == 8.4.4 GHC == 8.2.2- GHC == 8.0.2- GHC == 7.10.3- GHC == 7.8.4 extra-doc-files: README.md@@ -63,11 +63,9 @@ default-language: Haskell2010 ghc-options: -Wall- if impl(ghc >= 8.0)- ghc-options:- -Wcompat- -Wno-star-is-type- -- The star-is-type warning cannot be sensiblity addressed while supporting GHC 7.+ -Wcompat+ -Wno-star-is-type+ -- The star-is-type warning cannot be sensiblity addressed while supporting GHC 7. hs-source-dirs: src default-extensions: DataKinds@@ -119,6 +117,7 @@ GitHub.Data.PublicSSHKeys GitHub.Data.PullRequests GitHub.Data.RateLimit+ GitHub.Data.Reactions GitHub.Data.Releases GitHub.Data.Repos GitHub.Data.Request@@ -159,6 +158,7 @@ GitHub.Endpoints.PullRequests.Comments GitHub.Endpoints.PullRequests.Reviews GitHub.Endpoints.RateLimit+ GitHub.Endpoints.Reactions GitHub.Endpoints.Repos GitHub.Endpoints.Repos.Collaborators GitHub.Endpoints.Repos.Comments@@ -185,26 +185,26 @@ -- Packages bundles with GHC, mtl and text are also here build-depends:- base >=4.7 && <5+ base >=4.10 && <5 , binary >=0.7.1.0 && <0.11- , bytestring >=0.10.4.0 && <0.12- , containers >=0.5.5.1 && <0.7- , deepseq >=1.3.0.2 && <1.5+ , bytestring >=0.10.4.0 && <0.13+ , containers >=0.5.5.1 && <1+ , deepseq >=1.3.0.2 && <1.6+ , exceptions >=0.10.2 && <0.11 , mtl >=2.1.3.1 && <2.2 || >=2.2.1 && <2.4- , text >=1.2.0.6 && <2.1- , time-compat >=1.9.2.2 && <1.10+ , text >=1.2.0.6 && <2.2+ , time >=1.8.0.2 && <2 , transformers >=0.3.0.0 && <0.7 -- other packages build-depends:- aeson >=1.4.0.0 && <1.6 || >=2.0.1.0 && <2.2- , base-compat >=0.11.1 && <0.14+ aeson >=1.4.0.0 && <1.6 || >=2.0.1.0 && <2.3+ , base-compat >=0.11.1 && <1 , base16-bytestring >=0.1.1.6 && <1.1 , binary-instances >=1 && <1.1 , cryptohash-sha1 >=0.11.100.1 && <0.12 , deepseq-generics >=0.2.0.0 && <0.3- , exceptions >=0.10.2 && <0.11- , hashable >=1.2.7.0 && <1.5+ , hashable >=1.2.7.0 && <2 , http-client >=0.5.12 && <0.8 , http-link-header >=1.0.3.1 && <1.3 , http-types >=0.12.3 && <0.13@@ -226,9 +226,6 @@ http-client-tls >=0.3.5.3 && <0.4 , tls >=1.4.1 - if !impl(ghc >=8.0)- build-depends: semigroups >=0.18.5 && <0.20- test-suite github-test default-language: Haskell2010 type: exitcode-stdio-1.0@@ -267,6 +264,7 @@ , file-embed , github , hspec >=2.6.1 && <2.12+ , http-client , tagged , text , unordered-containers
spec/GitHub/IssuesSpec.hs view
@@ -6,13 +6,14 @@ import Prelude () import Prelude.Compat -import Data.Either.Compat (isRight)-import Data.Foldable (for_)-import Data.String (fromString)-import System.Environment (lookupEnv)-import Test.Hspec- (Spec, describe, expectationFailure, it, pendingWith, shouldSatisfy)+import Data.Either.Compat (isRight)+import Data.Foldable (for_)+import Data.String (fromString)+import Network.HTTP.Client (newManager, responseBody)+import System.Environment (lookupEnv)+import Test.Hspec (Spec, describe, expectationFailure, it, pendingWith, shouldSatisfy) + fromRightS :: Show a => Either a b -> b fromRightS (Right b) = b fromRightS (Left a) = error $ "Expected a Right and got a Left" ++ show a@@ -38,6 +39,25 @@ cms <- GitHub.executeRequest auth $ GitHub.commentsR owner repo (GitHub.issueNumber i) 1 cms `shouldSatisfy` isRight++ describe "issuesForRepoR paged" $ do+ it "works" $ withAuth $ \auth -> for_ repos $ \(owner, repo) -> do+ mgr <- newManager GitHub.tlsManagerSettings+ ret <- GitHub.executeRequestWithMgrAndRes mgr auth $+ GitHub.issuesForRepoR owner repo mempty (GitHub.FetchPage (GitHub.PageParams (Just 2) (Just 1)))++ case ret of+ Left e ->+ expectationFailure . show $ e+ Right res -> do+ let issues = responseBody res+ length issues `shouldSatisfy` (<= 2)++ for_ issues $ \i -> do+ cms <- GitHub.executeRequest auth $+ GitHub.commentsR owner repo (GitHub.issueNumber i) 1+ cms `shouldSatisfy` isRight+ describe "issueR" $ do it "fetches issue #428" $ withAuth $ \auth -> do resIss <- GitHub.executeRequest auth $
src/GitHub.hs view
@@ -173,6 +173,7 @@ membersOfWithR, isMemberOfR, orgInvitationsR,+ orgMembershipR, -- ** Outside Collaborators -- | See <https://developer.github.com/v3/orgs/outside_collaborators/> --@@ -285,6 +286,15 @@ commitR, diffR, + -- ** Reactions+ -- | See <https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28>+ issueReactionsR,+ createIssueReactionR,+ deleteIssueReactionR,+ commentReactionsR,+ createCommentReactionR,+ deleteCommentReactionR,+ -- ** Contents -- | See <https://developer.github.com/v3/repos/contents/> contentsForR,@@ -514,6 +524,7 @@ import GitHub.Endpoints.PullRequests import GitHub.Endpoints.PullRequests.Comments import GitHub.Endpoints.PullRequests.Reviews+import GitHub.Endpoints.Reactions import GitHub.Endpoints.RateLimit import GitHub.Endpoints.Repos import GitHub.Endpoints.Repos.Collaborators
src/GitHub/Auth.hs view
@@ -1,5 +1,7 @@ module GitHub.Auth ( Auth (..),+ Token,+ JWTToken, AuthMethod, endpoint, setAuthRequest@@ -9,14 +11,17 @@ import Prelude () import qualified Data.ByteString as BS+import qualified Data.Text.Encoding as TE import qualified Network.HTTP.Client as HTTP type Token = BS.ByteString+type JWTToken = Text -- | The Github auth data type data Auth = BasicAuth BS.ByteString BS.ByteString -- ^ Username and password | OAuth Token -- ^ OAuth token+ | JWT JWTToken -- ^ JWT Token | EnterpriseOAuth Text Token -- ^ Custom endpoint and OAuth token deriving (Show, Data, Typeable, Eq, Ord, Generic) @@ -40,10 +45,12 @@ instance AuthMethod Auth where endpoint (BasicAuth _ _) = Nothing endpoint (OAuth _) = Nothing+ endpoint (JWT _) = Nothing endpoint (EnterpriseOAuth e _) = Just e setAuthRequest (BasicAuth u p) = HTTP.applyBasicAuth u p setAuthRequest (OAuth t) = setAuthHeader $ "token " <> t+ setAuthRequest (JWT t) = setAuthHeader $ "Bearer " <> TE.encodeUtf8 t setAuthRequest (EnterpriseOAuth _ t) = setAuthHeader $ "token " <> t setAuthHeader :: BS.ByteString -> HTTP.Request -> HTTP.Request
src/GitHub/Data.hs view
@@ -1,5 +1,3 @@-{-# LANGUAGE CPP #-}- -- | -- This module re-exports the @GitHub.Data.@ and "GitHub.Auth" submodules. @@ -57,6 +55,7 @@ module GitHub.Data.PullRequests, module GitHub.Data.RateLimit, module GitHub.Data.Releases,+ module GitHub.Data.Reactions, module GitHub.Data.Repos, module GitHub.Data.Request, module GitHub.Data.Reviews,@@ -99,6 +98,7 @@ import GitHub.Data.PullRequests import GitHub.Data.RateLimit import GitHub.Data.Releases+import GitHub.Data.Reactions import GitHub.Data.Repos import GitHub.Data.Request import GitHub.Data.Reviews
src/GitHub/Data/Actions/WorkflowJobs.hs view
@@ -47,6 +47,7 @@ , jobConclusion :: !Text , jobStartedAt :: !UTCTime , jobCompletedAt :: !UTCTime+ , jobName :: !(Name Job) , jobSteps :: !(Vector JobStep) , jobRunCheckUrl :: !URL , jobLabels :: !(Vector Text)@@ -84,6 +85,7 @@ <*> o .: "conclusion" <*> o .: "started_at" <*> o .: "completed_at"+ <*> o .: "name" <*> o .: "steps" <*> o .: "check_run_url" <*> o .: "labels"
src/GitHub/Data/Activities.hs view
@@ -26,7 +26,7 @@ data Subject = Subject { subjectTitle :: !Text- , subjectURL :: !URL+ , subjectURL :: !(Maybe URL) , subjectLatestCommentURL :: !(Maybe URL) -- https://developer.github.com/v3/activity/notifications/ doesn't indicate -- what the possible values for this field are.@@ -46,13 +46,18 @@ <*> o .: "type" data NotificationReason- = AssignReason+ = ApprovalRequestedReason+ | AssignReason | AuthorReason | CommentReason+ | CiActivityReason | InvitationReason | ManualReason+ | MemberFeatureRequestedReason | MentionReason | ReviewRequestedReason+ | SecurityAlertReason+ | SecurityAdvisoryCreditReason | StateChangeReason | SubscribedReason | TeamMentionReason@@ -63,17 +68,22 @@ instance FromJSON NotificationReason where parseJSON = withText "NotificationReason" $ \t -> case T.toLower t of- "assign" -> pure AssignReason- "author" -> pure AuthorReason- "comment" -> pure CommentReason- "invitation" -> pure InvitationReason- "manual" -> pure ManualReason- "mention" -> pure MentionReason- "review_requested" -> pure ReviewRequestedReason- "state_change" -> pure StateChangeReason- "subscribed" -> pure SubscribedReason- "team_mention" -> pure TeamMentionReason- _ -> fail $ "Unknown NotificationReason " ++ show t+ "approval_requested" -> pure ApprovalRequestedReason+ "assign" -> pure AssignReason+ "author" -> pure AuthorReason+ "comment" -> pure CommentReason+ "ci_activity" -> pure CiActivityReason+ "invitation" -> pure InvitationReason+ "manual" -> pure ManualReason+ "member_feature_requested" -> pure MemberFeatureRequestedReason+ "mention" -> pure MentionReason+ "review_requested" -> pure ReviewRequestedReason+ "security_alert" -> pure SecurityAlertReason+ "security_advisory_credit" -> pure SecurityAdvisoryCreditReason+ "state_change" -> pure StateChangeReason+ "subscribed" -> pure SubscribedReason+ "team_mention" -> pure TeamMentionReason+ _ -> fail $ "Unknown NotificationReason " ++ show t data Notification = Notification -- XXX: The notification id field type IS in fact string. Not sure why gh
src/GitHub/Data/Definitions.hs view
@@ -233,6 +233,63 @@ -- | Count of elements type Count = Int +++data MembershipRole+ = MembershipRoleMember+ | MembershipRoleAdmin+ | MembershipRoleBillingManager+ deriving+ (Eq, Ord, Show, Enum, Bounded, Generic, Typeable, Data)++instance NFData MembershipRole where rnf = genericRnf+instance Binary MembershipRole++instance FromJSON MembershipRole where+ parseJSON = withText "MembershipRole" $ \t -> case T.toLower t of+ "member" -> pure MembershipRoleMember+ "admin" -> pure MembershipRoleAdmin+ "billing_manager" -> pure MembershipRoleBillingManager+ _ -> fail $ "Unknown MembershipRole: " <> T.unpack t++data MembershipState+ = MembershipPending+ | MembershipActive+ deriving (Show, Data, Typeable, Eq, Ord, Generic)++instance NFData MembershipState where rnf = genericRnf+instance Binary MembershipState++instance FromJSON MembershipState where+ parseJSON = withText "MembershipState" $ \t -> case T.toLower t of+ "active" -> pure MembershipActive+ "pending" -> pure MembershipPending+ _ -> fail $ "Unknown MembershipState: " <> T.unpack t+++data Membership = Membership+ { membershipUrl :: !URL+ , membershipState :: !MembershipState+ , membershipRole :: !MembershipRole+ , membershipOrganizationUrl :: !URL+ , membershipOrganization :: !SimpleOrganization+ , membershipUser :: !SimpleUser+ }+ deriving (Show, Data, Typeable, Eq, Ord, Generic)++instance NFData Membership where rnf = genericRnf+instance Binary Membership++instance FromJSON Membership where+ parseJSON = withObject "Membership" $ \o -> Membership+ <$> o .: "url"+ <*> o .: "state"+ <*> o .: "role"+ <*> o .: "organization_url"+ <*> o .: "organization"+ <*> o .: "user"++ ------------------------------------------------------------------------------- -- IssueNumber -------------------------------------------------------------------------------
src/GitHub/Data/Name.hs view
@@ -1,4 +1,3 @@-{-# LANGUAGE CPP #-} module GitHub.Data.Name ( Name(..), mkName,@@ -8,10 +7,8 @@ import Prelude () import GitHub.Internal.Prelude -#if MIN_VERSION_aeson(1,0,0) import Data.Aeson.Types (FromJSONKey (..), ToJSONKey (..), fromJSONKeyCoerce, toJSONKeyText)-#endif newtype Name entity = N Text deriving (Eq, Ord, Show, Generic, Typeable, Data)@@ -38,7 +35,6 @@ instance IsString (Name entity) where fromString = N . fromString -#if MIN_VERSION_aeson(1,0,0) -- | @since 0.15.0.0 instance ToJSONKey (Name entity) where toJSONKey = toJSONKeyText untagName@@ -46,4 +42,3 @@ -- | @since 0.15.0.0 instance FromJSONKey (Name entity) where fromJSONKey = fromJSONKeyCoerce-#endif
src/GitHub/Data/Options.hs view
@@ -122,6 +122,7 @@ -- | 'GitHub.Data.Issues.Issue' state reason data IssueStateReason = StateReasonCompleted+ | StateReasonDuplicate | StateReasonNotPlanned | StateReasonReopened deriving@@ -130,12 +131,14 @@ instance ToJSON IssueStateReason where toJSON = String . \case StateReasonCompleted -> "completed"+ StateReasonDuplicate -> "duplicate" StateReasonNotPlanned -> "not_planned" StateReasonReopened -> "reopened" instance FromJSON IssueStateReason where parseJSON = withText "IssueStateReason" $ \t -> case T.toLower t of "completed" -> pure StateReasonCompleted+ "duplicate" -> pure StateReasonDuplicate "not_planned" -> pure StateReasonNotPlanned "reopened" -> pure StateReasonReopened _ -> fail $ "Unknown IssueStateReason: " <> T.unpack t
src/GitHub/Data/RateLimit.hs view
@@ -3,7 +3,7 @@ import GitHub.Internal.Prelude import Prelude () -import Data.Time.Clock.System.Compat (SystemTime (..))+import Data.Time.Clock.System (SystemTime (..)) import qualified Data.ByteString.Char8 as BS8 import qualified Network.HTTP.Client as HTTP
+ src/GitHub/Data/Reactions.hs view
@@ -0,0 +1,78 @@+{-# LANGUAGE InstanceSigs #-}+module GitHub.Data.Reactions where++import qualified Data.Text as T+import GitHub.Data.Id (Id)+import GitHub.Data.Definitions (SimpleUser)+import GitHub.Internal.Prelude+import Prelude ()++data Reaction = Reaction+ { reactionId :: Id Reaction+ , reactionUser :: !(Maybe SimpleUser)+ , reactionContent :: !ReactionContent+ , reactionCreatedAt :: !UTCTime+ }+ deriving (Show, Data, Typeable, Eq, Ord, Generic)++instance NFData Reaction where rnf = genericRnf+instance Binary Reaction++data NewReaction = NewReaction+ { newReactionContent :: !ReactionContent+ }+ deriving (Show, Data, Typeable, Eq, Ord, Generic)++instance NFData NewReaction where rnf = genericRnf+instance Binary NewReaction++-- |+-- <https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28#about-reactions>+data ReactionContent+ = PlusOne+ | MinusOne+ | Laugh+ | Confused+ | Heart+ | Hooray+ | Rocket+ | Eyes+ deriving (Show, Data, Typeable, Eq, Ord, Enum, Bounded, Generic)++instance NFData ReactionContent where rnf = genericRnf+instance Binary ReactionContent++-- JSON instances++instance FromJSON Reaction where+ parseJSON = withObject "Reaction" $ \o ->+ Reaction+ <$> o .: "id"+ <*> o .:? "user"+ <*> o .: "content"+ <*> o .: "created_at"++instance ToJSON NewReaction where+ toJSON (NewReaction content) = object ["content" .= content]++instance FromJSON ReactionContent where+ parseJSON = withText "ReactionContent" $ \case+ "+1" -> pure PlusOne+ "-1" -> pure MinusOne+ "laugh" -> pure Laugh+ "confused" -> pure Confused+ "heart" -> pure Heart+ "hooray" -> pure Hooray+ "rocket" -> pure Rocket+ "eyes" -> pure Eyes+ t -> fail $ "Unknown ReactionContent: " <> T.unpack t++instance ToJSON ReactionContent where+ toJSON PlusOne = String "+1"+ toJSON MinusOne = String "-1"+ toJSON Laugh = String "laugh"+ toJSON Confused = String "confused"+ toJSON Heart = String "heart"+ toJSON Hooray = String "hooray"+ toJSON Rocket = String "rocket"+ toJSON Eyes = String "eyes"
src/GitHub/Data/Repos.hs view
@@ -1,6 +1,4 @@-{-# LANGUAGE CPP #-} {-# LANGUAGE FlexibleInstances #-}-#define UNSAFE 1 -- | -- This module also exports@@ -19,13 +17,7 @@ import qualified Data.HashMap.Strict as HM import qualified Data.Text as T-#if MIN_VERSION_aeson(1,0,0) import Data.Aeson.Types (FromJSONKey (..), fromJSONKeyCoerce)-#else-#ifdef UNSAFE-import Unsafe.Coerce (unsafeCoerce)-#endif-#endif data Repo = Repo { repoId :: !(Id Repo)@@ -383,22 +375,8 @@ instance ToJSON Language where toJSON = toJSON . getLanguage -#if MIN_VERSION_aeson(1,0,0) instance FromJSONKey Language where fromJSONKey = fromJSONKeyCoerce-#else-instance FromJSON a => FromJSON (HM.HashMap Language a) where- parseJSON = fmap mapKeyLanguage . parseJSON- where- mapKeyLanguage :: HM.HashMap Text a -> HM.HashMap Language a-#ifdef UNSAFE- mapKeyLanguage = unsafeCoerce-#else- mapKeyLanguage = mapKey Language- mapKey :: (Eq k2, Hashable k2) => (k1 -> k2) -> HM.HashMap k1 a -> HM.HashMap k2 a- mapKey f = HM.fromList . map (first f) . HM.toList-#endif-#endif data ArchiveFormat = ArchiveFormatTarball -- ^ ".tar.gz" format
src/GitHub/Data/Request.hs view
@@ -1,4 +1,3 @@-{-# LANGUAGE CPP #-} {-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE GADTs #-} {-# LANGUAGE KindSignatures #-}@@ -15,6 +14,8 @@ CommandMethod(..), toMethod, FetchCount(..),+ PageParams(..),+ PageLinks(..), MediaType (..), Paths, IsPathPart(..),@@ -30,6 +31,7 @@ import qualified Data.ByteString.Lazy as LBS import qualified Data.Text as T import qualified Network.HTTP.Types.Method as Method+import Network.URI (URI) ------------------------------------------------------------------------------ -- Path parts@@ -75,7 +77,10 @@ -- | 'PagedQuery' returns just some results, using this data we can specify how -- many pages we want to fetch.-data FetchCount = FetchAtLeast !Word | FetchAll+data FetchCount =+ FetchAtLeast !Word+ | FetchAll+ | FetchPage PageParams deriving (Eq, Ord, Read, Show, Generic, Typeable) @@ -96,6 +101,37 @@ instance Hashable FetchCount instance Binary FetchCount instance NFData FetchCount where rnf = genericRnf++-------------------------------------------------------------------------------+-- PageParams+-------------------------------------------------------------------------------++-- | Params for specifying the precise page and items per page.+data PageParams = PageParams {+ pageParamsPerPage :: Maybe Int+ , pageParamsPage :: Maybe Int+ }+ deriving (Eq, Ord, Read, Show, Generic, Typeable)++instance Hashable PageParams+instance Binary PageParams+instance NFData PageParams where rnf = genericRnf++-------------------------------------------------------------------------------+-- PageLinks+-------------------------------------------------------------------------------++-- | 'PagedQuery' returns just some results, using this data we can specify how+-- many pages we want to fetch.+data PageLinks = PageLinks {+ pageLinksPrev :: Maybe URI+ , pageLinksNext :: Maybe URI+ , pageLinksLast :: Maybe URI+ , pageLinksFirst :: Maybe URI+ }+ deriving (Eq, Ord, Show, Generic, Typeable)++instance NFData PageLinks where rnf = genericRnf ------------------------------------------------------------------------------- -- MediaType
src/GitHub/Endpoints/Issues.hs view
@@ -1,5 +1,3 @@-{-# LANGUAGE CPP #-}- -- | -- The issues API as described on <http://developer.github.com/v3/issues/>.
src/GitHub/Endpoints/Organizations/Members.hs view
@@ -7,6 +7,7 @@ membersOfWithR, isMemberOfR, orgInvitationsR,+ orgMembershipR, module GitHub.Data, ) where @@ -48,3 +49,10 @@ -- See <https://developer.github.com/v3/orgs/members/#list-pending-organization-invitations> orgInvitationsR :: Name Organization -> FetchCount -> Request 'RA (Vector Invitation) orgInvitationsR org = pagedQuery ["orgs", toPathPart org, "invitations"] []++-- | Get user membership information in an organization+--+-- See <https://docs.github.com/en/rest/orgs/members#get-organization-membership-for-a-user>+orgMembershipR :: Name User -> Name Organization -> Request 'RA Membership+orgMembershipR user org =+ Query [ "orgs", toPathPart org, "memberships", toPathPart user ] []
+ src/GitHub/Endpoints/Reactions.hs view
@@ -0,0 +1,60 @@+-- |+-- The Reactions API as described at+-- <https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28>.+module GitHub.Endpoints.Reactions (+ issueReactionsR,+ createIssueReactionR,+ deleteIssueReactionR,+ commentReactionsR,+ createCommentReactionR,+ deleteCommentReactionR,+ module GitHub.Data,+) where++import GitHub.Data+import GitHub.Internal.Prelude+import Prelude ()++-- | List reactions for an issue.+-- See <https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28#list-reactions-for-an-issue>+issueReactionsR :: Name Owner -> Name Repo -> Id Issue -> FetchCount -> Request k (Vector Reaction)+issueReactionsR owner repo iid =+ pagedQuery ["repos", toPathPart owner, toPathPart repo, "issues", toPathPart iid, "reactions"] []++-- | Create reaction for an issue comment.+-- See <https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28#create-reaction-for-an-issue>+createIssueReactionR :: Name Owner -> Name Repo -> Id Issue -> ReactionContent -> Request 'RW Reaction+createIssueReactionR owner repo iid content =+ command Post parts (encode $ NewReaction content)+ where+ parts = ["repos", toPathPart owner, toPathPart repo, "issues", toPathPart iid, "reactions"]++-- | Delete an issue comment reaction.+-- See <https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28#delete-an-issue-reaction>+deleteIssueReactionR :: Name Owner -> Name Repo -> Id Issue -> Id Reaction -> GenRequest 'MtUnit 'RW ()+deleteIssueReactionR owner repo iid rid =+ Command Delete parts mempty+ where+ parts = ["repos", toPathPart owner, toPathPart repo, "issues", toPathPart iid, "reactions", toPathPart rid]++-- | List reactions for an issue comment.+-- See <https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28#list-reactions-for-an-issue-comment>+commentReactionsR :: Name Owner -> Name Repo -> Id Comment -> FetchCount -> Request k (Vector Reaction)+commentReactionsR owner repo cid =+ pagedQuery ["repos", toPathPart owner, toPathPart repo, "issues", "comments", toPathPart cid, "reactions"] []++-- | Create reaction for an issue comment.+-- See https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28#create-reaction-for-an-issue-comment+createCommentReactionR :: Name Owner -> Name Repo -> Id Comment -> ReactionContent -> Request 'RW Reaction+createCommentReactionR owner repo cid content =+ command Post parts (encode $ NewReaction content)+ where+ parts = ["repos", toPathPart owner, toPathPart repo, "issues", "comments", toPathPart cid, "reactions"]++-- | Delete an issue comment reaction.+-- See <https://docs.github.com/en/rest/reactions/reactions?apiVersion=2022-11-28#delete-an-issue-comment-reaction>+deleteCommentReactionR :: Name Owner -> Name Repo -> Id Comment -> Id Reaction -> GenRequest 'MtUnit 'RW ()+deleteCommentReactionR owner repo cid rid =+ Command Delete parts mempty+ where+ parts = ["repos", toPathPart owner, toPathPart repo, "issues", "comments", toPathPart cid, "reactions", toPathPart rid]
src/GitHub/Endpoints/Repos/Comments.hs view
@@ -1,5 +1,3 @@-{-# LANGUAGE CPP #-}- -- | -- The repo commits API as described on -- <http://developer.github.com/v3/repos/comments/>.
src/GitHub/Endpoints/Repos/Commits.hs view
@@ -1,5 +1,3 @@-{-# LANGUAGE CPP #-}- -- | -- The repo commits API as described on -- <http://developer.github.com/v3/repos/commits/>.
src/GitHub/Internal/Prelude.hs view
@@ -1,5 +1,4 @@ {-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE CPP #-} -- | -- This module may change between minor releases. Do not rely on its contents.@@ -24,7 +23,7 @@ import Data.Semigroup as X (Semigroup (..)) import Data.String as X (IsString (..)) import Data.Text as X (Text, pack, unpack)-import Data.Time.Compat as X (UTCTime)+import Data.Time as X (UTCTime) import Data.Time.ISO8601 as X (formatISO8601) import Data.Vector as X (Vector) import GHC.Generics as X (Generic)
src/GitHub/Request.hs view
@@ -54,6 +54,7 @@ ParseResponse (..), makeHttpRequest, parseStatus,+ parsePageLinks, StatusMap, getNextUrl, performPagedRequest,@@ -79,6 +80,7 @@ import Control.Monad.Trans.Except (ExceptT (..), runExceptT) import Data.Aeson (eitherDecode) import Data.List (find)+import Data.Maybe (fromMaybe) import Data.Tagged (Tagged (..)) import Data.Version (showVersion) @@ -87,13 +89,14 @@ httpLbs, method, newManager, redirectCount, requestBody, requestHeaders, setQueryString, setRequestIgnoreStatus) import Network.HTTP.Link.Parser (parseLinkHeaderBS)-import Network.HTTP.Link.Types (LinkParam (..), href, linkParams)+import Network.HTTP.Link.Types (Link(..), LinkParam (..), href, linkParams) import Network.HTTP.Types (Method, RequestHeaders, Status (..)) import Network.URI (URI, escapeURIString, isUnescapedInURIComponent, parseURIReference, relativeTo) import qualified Data.ByteString as BS+import Data.ByteString.Builder (intDec, toLazyByteString) import qualified Data.ByteString.Lazy as LBS import qualified Data.Text as T import qualified Data.Text.Encoding as TE@@ -199,11 +202,6 @@ manager <- newManager tlsManagerSettings executeRequestWithMgr manager auth req -lessFetchCount :: Int -> FetchCount -> Bool-lessFetchCount _ FetchAll = True-lessFetchCount i (FetchAtLeast j) = i < fromIntegral j-- -- | Like 'executeRequest' but with provided 'Manager'. executeRequestWithMgr :: (AuthMethod am, ParseResponse mt a)@@ -235,10 +233,13 @@ res <- httpLbs' httpReq (<$ res) <$> unTagged (parseResponse httpReq res :: Tagged mt (ExceptT Error IO b)) - performHttpReq httpReq (PagedQuery _ _ l) =- unTagged (performPagedRequest httpLbs' predicate httpReq :: Tagged mt (ExceptT Error IO (HTTP.Response b)))- where- predicate v = lessFetchCount (length v) l+ performHttpReq httpReq (PagedQuery _ _ (FetchPage _)) = do+ (res, _pageLinks) <- unTagged (performPerPageRequest httpLbs' httpReq :: Tagged mt (ExceptT Error IO (HTTP.Response b, PageLinks)))+ return res+ performHttpReq httpReq (PagedQuery _ _ FetchAll) =+ unTagged (performPagedRequest httpLbs' (const True) httpReq :: Tagged mt (ExceptT Error IO (HTTP.Response b)))+ performHttpReq httpReq (PagedQuery _ _ (FetchAtLeast j)) =+ unTagged (performPagedRequest httpLbs' (\v -> length v < fromIntegral j) httpReq :: Tagged mt (ExceptT Error IO (HTTP.Response b))) performHttpReq httpReq (Command _ _ _) = do res <- httpLbs' httpReq@@ -456,7 +457,7 @@ $ setReqHeaders . unTagged (modifyRequest :: Tagged mt (HTTP.Request -> HTTP.Request)) . maybe id setAuthRequest auth- . setQueryString qs+ . setQueryString (qs <> extraQueryItems) $ req PagedQuery paths qs _ -> do req <- parseUrl' $ url paths@@ -464,7 +465,7 @@ $ setReqHeaders . unTagged (modifyRequest :: Tagged mt (HTTP.Request -> HTTP.Request)) . maybe id setAuthRequest auth- . setQueryString qs+ . setQueryString (qs <> extraQueryItems) $ req Command m paths body -> do req <- parseUrl' $ url paths@@ -496,6 +497,14 @@ setBody :: LBS.ByteString -> HTTP.Request -> HTTP.Request setBody body req = req { requestBody = RequestBodyLBS body } + extraQueryItems :: [(BS.ByteString, Maybe BS.ByteString)]+ extraQueryItems = case r of+ PagedQuery _ _ (FetchPage pp) -> catMaybes [+ (\page -> ("page", Just (LBS.toStrict $ toLazyByteString $ intDec page))) <$> pageParamsPage pp+ , (\perPage -> ("per_page", Just (LBS.toStrict $ toLazyByteString $ intDec perPage))) <$> pageParamsPerPage pp+ ]+ _ -> []+ -- | Query @Link@ header with @rel=next@ from the request headers. getNextUrl :: HTTP.Response a -> Maybe URI getNextUrl req = do@@ -541,6 +550,35 @@ m <- unTagged (parseResponse req' res' :: Tagged mt (m a)) go (acc <> m) res' req' (_, _) -> return (acc <$ res)++-- | Helper for requesting a single page, as specified by 'PageParams'.+--+-- This parses and returns the 'PageLinks' alongside the HTTP response.+performPerPageRequest+ :: forall a m mt. (ParseResponse mt a, MonadCatch m, MonadError Error m)+ => (HTTP.Request -> m (HTTP.Response LBS.ByteString)) -- ^ `httpLbs` analogue+ -> HTTP.Request -- ^ initial request+ -> Tagged mt (m (HTTP.Response a, PageLinks))+performPerPageRequest httpLbs' initReq = Tagged $ do+ res <- httpLbs' initReq+ m <- unTagged (parseResponse initReq res :: Tagged mt (m a))+ return (m <$ res, parsePageLinks res)++-- | Parse the 'PageLinks' from an HTTP response, where the information is+-- encoded in the Link header.+parsePageLinks :: HTTP.Response a -> PageLinks+parsePageLinks res = PageLinks {+ pageLinksPrev = linkToUri <$> find (elem (Rel, "prev") . linkParams) links+ , pageLinksNext = linkToUri <$> find (elem (Rel, "next") . linkParams) links+ , pageLinksLast = linkToUri <$> find (elem (Rel, "last") . linkParams) links+ , pageLinksFirst = linkToUri <$> find (elem (Rel, "first") . linkParams) links+ }+ where+ links :: [Link URI]+ links = fromMaybe [] (lookup "Link" (responseHeaders res) >>= parseLinkHeaderBS)++ linkToUri :: Link URI -> URI+ linkToUri (Link uri _) = uri ------------------------------------------------------------------------------- -- Internal