Update nav and include bootstrap responsive
This commit is contained in:
parent
b3dcf31228
commit
de112cd75f
4 changed files with 1130 additions and 9 deletions
|
@ -91,6 +91,7 @@ instance Yesod App where
|
|||
$(combineStylesheets 'StaticR
|
||||
[ css_normalize_css
|
||||
, css_bootstrap_css
|
||||
, css_bootstrap_responsive_css
|
||||
])
|
||||
$(widgetFile "default-layout")
|
||||
|
||||
|
|
1109
static/css/bootstrap.responsive.css
vendored
Normal file
1109
static/css/bootstrap.responsive.css
vendored
Normal file
File diff suppressed because it is too large
Load diff
|
@ -1,13 +1,21 @@
|
|||
<nav .navbar .navbar-default role=navigation>
|
||||
<p>
|
||||
<a href=@{HomeR}>Home
|
||||
$maybe Entity _ user <- muser
|
||||
You are logged in as #{userDisplay user} (#{userHandle user}).
|
||||
View public page
|
||||
<a href=@{ProfileR}>Edit profile
|
||||
<a href=@{AuthR LogoutR}>Logout
|
||||
$nothing
|
||||
<a href=@{AuthR LoginR}>Login
|
||||
<div .container>
|
||||
<div .navbar-header>
|
||||
<div .navbar-brand>
|
||||
<a href=@{HomeR}>
|
||||
Stackage
|
||||
<ul .nav .navbar-nav>
|
||||
<li>
|
||||
<a href=@{HomeR}>Home
|
||||
$maybe Entity _ user <- muser
|
||||
<li>You are logged in as #{userDisplay user} (#{userHandle user}).
|
||||
<li>
|
||||
<a href=@{ProfileR}>Edit profile
|
||||
<li>
|
||||
<a href=@{AuthR LogoutR}>Logout
|
||||
$nothing
|
||||
<li>
|
||||
<a href=@{AuthR LoginR}>Login
|
||||
|
||||
$maybe msg <- mmsg
|
||||
<div .alert .alter-info>#{msg}
|
||||
|
|
3
templates/default-layout.lucius
Normal file
3
templates/default-layout.lucius
Normal file
|
@ -0,0 +1,3 @@
|
|||
.brand {
|
||||
|
||||
}
|
Loading…
Reference in a new issue