20 lines
424 B
Haskell
20 lines
424 B
Haskell
module Handler.Admin
|
|
( module Handler.Admin
|
|
) where
|
|
|
|
import Import
|
|
|
|
import Handler.Utils
|
|
|
|
import Handler.Admin.Test as Handler.Admin
|
|
import Handler.Admin.ErrorMessage as Handler.Admin
|
|
import Handler.Admin.StudyFeatures as Handler.Admin
|
|
import Handler.Admin.Tokens as Handler.Admin
|
|
|
|
|
|
getAdminR :: Handler Html
|
|
getAdminR =
|
|
siteLayoutMsg MsgAdminHeading $ do
|
|
setTitleI MsgAdminHeading
|
|
i18n MsgAdminPageEmpty
|