packages feed

lambdacms-core-0.3.0.1: templates/adminhome.hamlet

<div .page-header .no-border-top>
    <h1>_{Msg.Dashboard}
<div .row>
    <div .col-xs-12>
        $maybe welcome <- welcomeWidget
            ^{welcome}
        <div .row>
            $forall (apiRoute, title) <- [(coreR $ ActionLogAdminR $ ActionLogAdminIndexR, Msg.AllLogs), (coreR $ ActionLogAdminR $ ActionLogAdminUserR authId, Msg.PersonalLogs)]
                $maybe r <- can (apiRoute) "GET"
                    <div .hidden .col-xs-12 .col-md-6 .get-action-logs data-url=@?{(r, [("limit", pack $ show actionLogChunkLength)])}>
                        <div .panel .panel-default>
                            <div .panel-heading>_{title}
                            <div .panel-body data-more=_{Msg.LoadMore}>