{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE DerivingStrategies #-}

module Hercules.API.Accounts.AccountSettingsPatch where

import Data.OpenApi qualified as O3
import Hercules.API.Prelude

data AccountSettingsPatch = AccountSettingsPatch
  { AccountSettingsPatch -> Maybe Bool
enableNewRepos :: Maybe Bool
  }
  deriving ((forall x. AccountSettingsPatch -> Rep AccountSettingsPatch x)
-> (forall x. Rep AccountSettingsPatch x -> AccountSettingsPatch)
-> Generic AccountSettingsPatch
forall x. Rep AccountSettingsPatch x -> AccountSettingsPatch
forall x. AccountSettingsPatch -> Rep AccountSettingsPatch x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x. AccountSettingsPatch -> Rep AccountSettingsPatch x
from :: forall x. AccountSettingsPatch -> Rep AccountSettingsPatch x
$cto :: forall x. Rep AccountSettingsPatch x -> AccountSettingsPatch
to :: forall x. Rep AccountSettingsPatch x -> AccountSettingsPatch
Generic, Int -> AccountSettingsPatch -> ShowS
[AccountSettingsPatch] -> ShowS
AccountSettingsPatch -> String
(Int -> AccountSettingsPatch -> ShowS)
-> (AccountSettingsPatch -> String)
-> ([AccountSettingsPatch] -> ShowS)
-> Show AccountSettingsPatch
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AccountSettingsPatch -> ShowS
showsPrec :: Int -> AccountSettingsPatch -> ShowS
$cshow :: AccountSettingsPatch -> String
show :: AccountSettingsPatch -> String
$cshowList :: [AccountSettingsPatch] -> ShowS
showList :: [AccountSettingsPatch] -> ShowS
Show, AccountSettingsPatch -> AccountSettingsPatch -> Bool
(AccountSettingsPatch -> AccountSettingsPatch -> Bool)
-> (AccountSettingsPatch -> AccountSettingsPatch -> Bool)
-> Eq AccountSettingsPatch
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AccountSettingsPatch -> AccountSettingsPatch -> Bool
== :: AccountSettingsPatch -> AccountSettingsPatch -> Bool
$c/= :: AccountSettingsPatch -> AccountSettingsPatch -> Bool
/= :: AccountSettingsPatch -> AccountSettingsPatch -> Bool
Eq)
  deriving anyclass (AccountSettingsPatch -> ()
(AccountSettingsPatch -> ()) -> NFData AccountSettingsPatch
forall a. (a -> ()) -> NFData a
$crnf :: AccountSettingsPatch -> ()
rnf :: AccountSettingsPatch -> ()
NFData, [AccountSettingsPatch] -> Value
[AccountSettingsPatch] -> Encoding
AccountSettingsPatch -> Value
AccountSettingsPatch -> Encoding
(AccountSettingsPatch -> Value)
-> (AccountSettingsPatch -> Encoding)
-> ([AccountSettingsPatch] -> Value)
-> ([AccountSettingsPatch] -> Encoding)
-> ToJSON AccountSettingsPatch
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
$ctoJSON :: AccountSettingsPatch -> Value
toJSON :: AccountSettingsPatch -> Value
$ctoEncoding :: AccountSettingsPatch -> Encoding
toEncoding :: AccountSettingsPatch -> Encoding
$ctoJSONList :: [AccountSettingsPatch] -> Value
toJSONList :: [AccountSettingsPatch] -> Value
$ctoEncodingList :: [AccountSettingsPatch] -> Encoding
toEncodingList :: [AccountSettingsPatch] -> Encoding
ToJSON, Value -> Parser [AccountSettingsPatch]
Value -> Parser AccountSettingsPatch
(Value -> Parser AccountSettingsPatch)
-> (Value -> Parser [AccountSettingsPatch])
-> FromJSON AccountSettingsPatch
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
$cparseJSON :: Value -> Parser AccountSettingsPatch
parseJSON :: Value -> Parser AccountSettingsPatch
$cparseJSONList :: Value -> Parser [AccountSettingsPatch]
parseJSONList :: Value -> Parser [AccountSettingsPatch]
FromJSON, Proxy AccountSettingsPatch
-> Declare (Definitions Schema) NamedSchema
(Proxy AccountSettingsPatch
 -> Declare (Definitions Schema) NamedSchema)
-> ToSchema AccountSettingsPatch
forall a.
(Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a
$cdeclareNamedSchema :: Proxy AccountSettingsPatch
-> Declare (Definitions Schema) NamedSchema
declareNamedSchema :: Proxy AccountSettingsPatch
-> Declare (Definitions Schema) NamedSchema
ToSchema, Typeable AccountSettingsPatch
Typeable AccountSettingsPatch =>
(Proxy AccountSettingsPatch
 -> Declare (Definitions Schema) NamedSchema)
-> ToSchema AccountSettingsPatch
Proxy AccountSettingsPatch
-> Declare (Definitions Schema) NamedSchema
forall a.
Typeable a =>
(Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a
$cdeclareNamedSchema :: Proxy AccountSettingsPatch
-> Declare (Definitions Schema) NamedSchema
declareNamedSchema :: Proxy AccountSettingsPatch
-> Declare (Definitions Schema) NamedSchema
O3.ToSchema)