Update nav and include bootstrap responsive

This commit is contained in:
Chris Done 2014-06-01 13:29:11 +02:00
parent b3dcf31228
commit de112cd75f
4 changed files with 1130 additions and 9 deletions

View File

@ -91,6 +91,7 @@ instance Yesod App where
$(combineStylesheets 'StaticR $(combineStylesheets 'StaticR
[ css_normalize_css [ css_normalize_css
, css_bootstrap_css , css_bootstrap_css
, css_bootstrap_responsive_css
]) ])
$(widgetFile "default-layout") $(widgetFile "default-layout")

1109
static/css/bootstrap.responsive.css vendored Normal file

File diff suppressed because it is too large Load Diff

View File

@ -1,12 +1,20 @@
<nav .navbar .navbar-default role=navigation> <nav .navbar .navbar-default role=navigation>
<p> <div .container>
<div .navbar-header>
<div .navbar-brand>
<a href=@{HomeR}>
Stackage
<ul .nav .navbar-nav>
<li>
<a href=@{HomeR}>Home <a href=@{HomeR}>Home
$maybe Entity _ user <- muser $maybe Entity _ user <- muser
You are logged in as #{userDisplay user} (#{userHandle user}). <li>You are logged in as #{userDisplay user} (#{userHandle user}).
View public page <li>
<a href=@{ProfileR}>Edit profile <a href=@{ProfileR}>Edit profile
<li>
<a href=@{AuthR LogoutR}>Logout <a href=@{AuthR LogoutR}>Logout
$nothing $nothing
<li>
<a href=@{AuthR LoginR}>Login <a href=@{AuthR LoginR}>Login
$maybe msg <- mmsg $maybe msg <- mmsg

View File

@ -0,0 +1,3 @@
.brand {
}