module Game.LambdaHack.Client.UI.ContentClientUI
( CCUI(..), emptyCCUI
) where
import Prelude ()
import qualified Data.Map.Strict as M
import Game.LambdaHack.Client.UI.Content.Input
import Game.LambdaHack.Client.UI.Content.Screen
data CCUI = CCUI
{ CCUI -> InputContent
coinput :: InputContent
, CCUI -> ScreenContent
coscreen :: ScreenContent
}
emptyCCUI :: CCUI
emptyCCUI :: CCUI
emptyCCUI = CCUI
{ coinput :: InputContent
coinput = Map KM CmdTriple
-> [(KM, CmdTriple)] -> Map HumanCmd [KM] -> InputContent
InputContent Map KM CmdTriple
forall k a. Map k a
M.empty [] Map HumanCmd [KM]
forall k a. Map k a
M.empty
, coscreen :: ScreenContent
coscreen = ScreenContent
emptyScreenContent
}