yogsototh/stackage-server
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update nav and include bootstrap responsive

Browse source
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
Show stats Download patch file Download diff file Expand all files Collapse all files

1
Foundation.hs
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
View file

File diff suppressed because it is too large Load diff

26
templates/default-layout.hamlet
View file

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

3
templates/default-layout.lucius Normal file
View file

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