SquidCounter/Web/FrontController.hs

20 lines
448 B
Haskell
Raw Normal View History

2024-02-27 21:29:41 +00:00
module Web.FrontController where
import IHP.RouterPrelude
import Web.Controller.Prelude
import Web.View.Layout (defaultLayout)
-- Controller Imports
import Web.Controller.Static
instance FrontController WebApplication where
controllers =
[ startPage WelcomeAction
-- Generator Marker
]
instance InitControllerContext WebApplication where
initContext = do
setLayout defaultLayout
initAutoRefresh