titan-1.0.2: src/CombinedEnvironment.hs
-- | The environment that contains both the view and the model.
--
module CombinedEnvironment
( CEnv
, module Exported
, GEnv.extra
)
where
-- Generic libraries
import qualified Hails.MVC.GenericCombinedEnvironment as GEnv
import Hails.MVC.DefaultGtkEnvironment as Exported
-- Internal libraries
import Model.ReactiveModel.ModelEvents as Exported
import Model.ProtectedModel as Exported
import Model.Model
import View as Exported
import View.Objects as Exported
import IOBridge
-- The simplest definition: a view, a model, and a set of events
type CEnv = GEnv.CEnv View Model ModelEvent IOBridge