module Chiasma.Test.Data.TmuxTestConfig where import Log (Severity (Info)) import qualified Polysemy.Process.Effect.Pty as Pty data TmuxTestConfig = TmuxTestConfig { TmuxTestConfig -> Rows width :: Pty.Rows, TmuxTestConfig -> Cols height :: Pty.Cols, TmuxTestConfig -> Int fontSize :: Int, TmuxTestConfig -> Bool gui :: Bool, TmuxTestConfig -> [Text] conf :: [Text], TmuxTestConfig -> Severity logLevel :: Severity, TmuxTestConfig -> Bool waitForPrompt :: Bool } deriving stock (TmuxTestConfig -> TmuxTestConfig -> Bool (TmuxTestConfig -> TmuxTestConfig -> Bool) -> (TmuxTestConfig -> TmuxTestConfig -> Bool) -> Eq TmuxTestConfig forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: TmuxTestConfig -> TmuxTestConfig -> Bool $c/= :: TmuxTestConfig -> TmuxTestConfig -> Bool == :: TmuxTestConfig -> TmuxTestConfig -> Bool $c== :: TmuxTestConfig -> TmuxTestConfig -> Bool Eq, Int -> TmuxTestConfig -> ShowS [TmuxTestConfig] -> ShowS TmuxTestConfig -> String (Int -> TmuxTestConfig -> ShowS) -> (TmuxTestConfig -> String) -> ([TmuxTestConfig] -> ShowS) -> Show TmuxTestConfig forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [TmuxTestConfig] -> ShowS $cshowList :: [TmuxTestConfig] -> ShowS show :: TmuxTestConfig -> String $cshow :: TmuxTestConfig -> String showsPrec :: Int -> TmuxTestConfig -> ShowS $cshowsPrec :: Int -> TmuxTestConfig -> ShowS Show, (forall x. TmuxTestConfig -> Rep TmuxTestConfig x) -> (forall x. Rep TmuxTestConfig x -> TmuxTestConfig) -> Generic TmuxTestConfig forall x. Rep TmuxTestConfig x -> TmuxTestConfig forall x. TmuxTestConfig -> Rep TmuxTestConfig x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep TmuxTestConfig x -> TmuxTestConfig $cfrom :: forall x. TmuxTestConfig -> Rep TmuxTestConfig x Generic) instance Default TmuxTestConfig where def :: TmuxTestConfig def = Rows -> Cols -> Int -> Bool -> [Text] -> Severity -> Bool -> TmuxTestConfig TmuxTestConfig Rows 240 Cols 61 Int 12 Bool False [Text] forall a. Monoid a => a mempty Severity Info Bool True