61 lines
2.0 KiB
Plaintext
61 lines
2.0 KiB
Plaintext
|
|
<!-- Static navbar -->
|
|
<nav .navbar.navbar-default.navbar-static-top>
|
|
<div .container>
|
|
<div .navbar-header>
|
|
<button type="button" .navbar-toggle.collapsed data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
|
|
<span class="sr-only">Toggle navigation</span>
|
|
<span class="icon-bar"></span>
|
|
<span class="icon-bar"></span>
|
|
<span class="icon-bar"></span>
|
|
|
|
<div #navbar .collapse.navbar-collapse>
|
|
<ul .nav.navbar-nav>
|
|
$forall menuType <- menuTypes
|
|
$case menuType
|
|
$of NavbarLeft (MenuItem label route _)
|
|
<li :Just route == mcurrentRoute:.active>
|
|
<a href=@{route}>#{label}
|
|
$of NavbarExtra (MenuItem label route _)
|
|
<li :Just route == mcurrentRoute:.active>
|
|
<a href=@{route}>#{label}
|
|
$of _
|
|
|
|
<ul .nav.navbar-nav.navbar-right>
|
|
$forall menuType <- menuTypes
|
|
$case menuType
|
|
$of NavbarRight (MenuItem label route _)
|
|
<li :Just route == mcurrentRoute:.active>
|
|
<a href=@{route}>#{label}
|
|
$of _
|
|
|
|
<!-- Page Contents -->
|
|
|
|
<div .container>
|
|
$if not $ Just HomeR == mcurrentRoute
|
|
<ul .breadcrumb>
|
|
$forall bc <- parents
|
|
<li>
|
|
<a href="@{fst bc}">#{snd bc}
|
|
|
|
<li .active>#{title}
|
|
|
|
$forall (status, msg) <- mmsgs
|
|
$with status2 <- bool status "info" (status == "")
|
|
<div class="alert alert-#{status2}">#{msg}
|
|
|
|
|
|
$if (Just HomeR == mcurrentRoute)
|
|
^{widget}
|
|
$else
|
|
<div .container>
|
|
<div .row>
|
|
<div .col-md-12>
|
|
^{widget}
|
|
|
|
<!-- Footer -->
|
|
<footer .footer>
|
|
<div .container>
|
|
<p .text-muted>
|
|
#{appCopyright $ appSettings master}
|