Safe Haskell	Safe-Inferred
Language	Haskell2010

GitHubRelease

Documentation

data Command Source #

Constructors

Upload
Fields file :: FilePath <?> "The path to the local file to upload." name :: String <?> "The name to give the file on the release." owner :: Maybe String <?> "The GitHub owner, either a user or organization." repo :: String <?> "The GitHub repository name." tag :: String <?> "The tag name." token :: Maybe String <?> "Your OAuth2 token."
Release
Fields title :: String <?> "The name of the release" owner :: Maybe String <?> "The GitHub owner, either a user or organization." repo :: String <?> "The GitHub repository name." tag :: String <?> "The tag name." description :: Maybe String <?> "Release description." token :: Maybe String <?> "Your OAuth2 token." preRelease :: Maybe Bool <?> "Indicates if this is a pre-release." draft :: Maybe Bool <?> "Indicates if this is a draft."
Delete
Fields name :: String <?> "The name to give the file on the release." owner :: Maybe String <?> "The GitHub owner, either a user or organization." repo :: String <?> "The GitHub repository name." tag :: String <?> "The tag name." token :: Maybe String <?> "Your OAuth2 token."
Version

Instances

Instances details

Generic Command Source #
Instance details Defined in GitHubRelease Associated Types type Rep Command :: Type -> Type # Methods from :: Command -> Rep Command x # to :: Rep Command x -> Command #
Show Command Source #
Instance details Defined in GitHubRelease Methods showsPrec :: Int -> Command -> ShowS # show :: Command -> String # showList :: [Command] -> ShowS #
ParseRecord Command Source #
Instance details Defined in GitHubRelease Methods parseRecord :: Parser Command #
type Rep Command Source #
Instance details Defined in GitHubRelease type Rep Command = D1 ('MetaData "Command" "GitHubRelease" "github-release-2.0.0.6-G6hmaBgCzXxD71mIsxNzWI" 'False) ((C1 ('MetaCons "Upload" 'PrefixI 'True) ((S1 ('MetaSel ('Just "file") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (FilePath <?> "The path to the local file to upload.")) :: (S1 ('MetaSel ('Just "name") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The name to give the file on the release.")) :: S1 ('MetaSel ('Just "owner") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe String <?> "The GitHub owner, either a user or organization.")))) :: (S1 ('MetaSel ('Just "repo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The GitHub repository name.")) :: (S1 ('MetaSel ('Just "tag") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The tag name.")) :: S1 ('MetaSel ('Just "token") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe String <?> "Your OAuth2 token."))))) :+: C1 ('MetaCons "Release" 'PrefixI 'True) (((S1 ('MetaSel ('Just "title") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The name of the release")) :: S1 ('MetaSel ('Just "owner") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe String <?> "The GitHub owner, either a user or organization."))) :: (S1 ('MetaSel ('Just "repo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The GitHub repository name.")) :: S1 ('MetaSel ('Just "tag") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The tag name.")))) :: ((S1 ('MetaSel ('Just "description") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe String <?> "Release description.")) :: S1 ('MetaSel ('Just "token") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe String <?> "Your OAuth2 token."))) :: (S1 ('MetaSel ('Just "preRelease") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool <?> "Indicates if this is a pre-release.")) :: S1 ('MetaSel ('Just "draft") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool <?> "Indicates if this is a draft.")))))) :+: (C1 ('MetaCons "Delete" 'PrefixI 'True) ((S1 ('MetaSel ('Just "name") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The name to give the file on the release.")) :: S1 ('MetaSel ('Just "owner") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe String <?> "The GitHub owner, either a user or organization."))) :: (S1 ('MetaSel ('Just "repo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The GitHub repository name.")) :: (S1 ('MetaSel ('Just "tag") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (String <?> "The tag name.")) :: S1 ('MetaSel ('Just "token") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe String <?> "Your OAuth2 token."))))) :+: C1 ('MetaCons "Version" 'PrefixI 'False) (U1 :: Type -> Type)))

main :: IO () Source #

runCommand :: Command -> IO () Source #

upload :: String -> Maybe String -> String -> String -> FilePath -> String -> IO () Source #

getUploadUrl :: Manager -> String -> Maybe String -> String -> String -> IO Template Source #

getTag :: FromJSON a => Manager -> String -> String -> String -> String -> IO (Either String a) Source #

authorizationHeader :: String -> Header Source #

userAgentHeader :: Header Source #

userAgent :: String Source #

versionString :: String Source #

uploadFile :: Manager -> Template -> String -> FilePath -> String -> IO (Response ByteString) Source #

uploadBody :: Manager -> Template -> String -> RequestBody -> String -> IO (Response ByteString) Source #