{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TemplateHaskell #-}
module Web.Slack.Auth where
import Control.DeepSeq (NFData)
import Data.Aeson.TH
import Data.Text (Text)
import GHC.Generics (Generic)
import Web.Slack.Util
import Prelude
data TestRsp = TestRsp
{ TestRsp -> Text
testRspUrl :: Text
, TestRsp -> Text
testRspTeam :: Text
, TestRsp -> Text
testRspUser :: Text
, TestRsp -> Text
testRspTeamId :: Text
, TestRsp -> Text
testRspUserId :: Text
, TestRsp -> Maybe Text
testRspEnterpriseId :: Maybe Text
}
deriving stock (TestRsp -> TestRsp -> Bool
(TestRsp -> TestRsp -> Bool)
-> (TestRsp -> TestRsp -> Bool) -> Eq TestRsp
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TestRsp -> TestRsp -> Bool
== :: TestRsp -> TestRsp -> Bool
$c/= :: TestRsp -> TestRsp -> Bool
/= :: TestRsp -> TestRsp -> Bool
Eq, (forall x. TestRsp -> Rep TestRsp x)
-> (forall x. Rep TestRsp x -> TestRsp) -> Generic TestRsp
forall x. Rep TestRsp x -> TestRsp
forall x. TestRsp -> Rep TestRsp x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x. TestRsp -> Rep TestRsp x
from :: forall x. TestRsp -> Rep TestRsp x
$cto :: forall x. Rep TestRsp x -> TestRsp
to :: forall x. Rep TestRsp x -> TestRsp
Generic, Int -> TestRsp -> ShowS
[TestRsp] -> ShowS
TestRsp -> String
(Int -> TestRsp -> ShowS)
-> (TestRsp -> String) -> ([TestRsp] -> ShowS) -> Show TestRsp
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TestRsp -> ShowS
showsPrec :: Int -> TestRsp -> ShowS
$cshow :: TestRsp -> String
show :: TestRsp -> String
$cshowList :: [TestRsp] -> ShowS
showList :: [TestRsp] -> ShowS
Show)
instance NFData TestRsp
$(deriveJSON (jsonOpts "testRsp") ''TestRsp)