From 325ce451fa5f49bc56795375a58e9719d4a99e64 Mon Sep 17 00:00:00 2001 From: iphydf Date: Sat, 21 Feb 2026 20:03:03 +0000 Subject: [PATCH] fix: Add missing permissions. --- src/GitHub/Types/Base/Permissions.hs | 12 ++++++++++++ stack.yaml | 2 +- 2 files changed, 13 insertions(+), 1 deletion(-) diff --git a/src/GitHub/Types/Base/Permissions.hs b/src/GitHub/Types/Base/Permissions.hs index 8fe81db..cc1ba74 100644 --- a/src/GitHub/Types/Base/Permissions.hs +++ b/src/GitHub/Types/Base/Permissions.hs @@ -15,10 +15,12 @@ import Test.QuickCheck.Arbitrary (Arbitrary (..)) data Permissions = Permissions { permissionsActions :: Maybe Text , permissionsAdministration :: Maybe Text + , permissionsArtifactMetadata :: Maybe Text , permissionsAttestations :: Maybe Text , permissionsChecks :: Maybe Text , permissionsContents :: Maybe Text , permissionsContentReferences :: Maybe Text + , permissionsCopilotRequests :: Maybe Text , permissionsDeployments :: Maybe Text , permissionsDiscussions :: Maybe Text , permissionsEmails :: Maybe Text @@ -27,6 +29,7 @@ data Permissions = Permissions , permissionsMembers :: Maybe Text , permissionsMergeQueues :: Maybe Text , permissionsMetadata :: Maybe Text + , permissionsModels :: Maybe Text , permissionsOrganizationAdministration :: Maybe Text , permissionsOrganizationCustomProperties :: Maybe Text , permissionsOrganizationHooks :: Maybe Text @@ -49,10 +52,12 @@ instance FromJSON Permissions where parseJSON (Object x) = Permissions <$> x .:? "actions" <*> x .:? "administration" + <*> x .:? "artifact_metadata" <*> x .:? "attestations" <*> x .:? "checks" <*> x .:? "contents" <*> x .:? "content_references" + <*> x .:? "copilot_requests" <*> x .:? "deployments" <*> x .:? "discussions" <*> x .:? "emails" @@ -61,6 +66,7 @@ instance FromJSON Permissions where <*> x .:? "members" <*> x .:? "merge_queues" <*> x .:? "metadata" + <*> x .:? "models" <*> x .:? "organization_administration" <*> x .:? "organization_custom_properties" <*> x .:? "organization_hooks" @@ -84,10 +90,12 @@ instance ToJSON Permissions where toJSON Permissions{..} = object [ "actions" .= permissionsActions , "administration" .= permissionsAdministration + , "artifact_metadata" .= permissionsArtifactMetadata , "attestations" .= permissionsAttestations , "checks" .= permissionsChecks , "contents" .= permissionsContents , "content_references" .= permissionsContentReferences + , "copilot_requests" .= permissionsCopilotRequests , "deployments" .= permissionsDeployments , "discussions" .= permissionsDiscussions , "emails" .= permissionsEmails @@ -96,6 +104,7 @@ instance ToJSON Permissions where , "members" .= permissionsMembers , "merge_queues" .= permissionsMergeQueues , "metadata" .= permissionsMetadata + , "models" .= permissionsModels , "organization_administration" .= permissionsOrganizationAdministration , "organization_custom_properties" .= permissionsOrganizationCustomProperties , "organization_hooks" .= permissionsOrganizationHooks @@ -145,3 +154,6 @@ instance Arbitrary Permissions where <*> arbitrary <*> arbitrary <*> arbitrary + <*> arbitrary + <*> arbitrary + <*> arbitrary diff --git a/stack.yaml b/stack.yaml index 759dcf2..8b87434 100644 --- a/stack.yaml +++ b/stack.yaml @@ -1,6 +1,6 @@ --- packages: [.] -resolver: lts-21.25 +resolver: lts-23.9 extra-deps: - Diff-1.0.2 - suspend-0.2.0.0