From ba33dfef23d070bfff92d6322808507c1b7d2814 Mon Sep 17 00:00:00 2001
From: Joris
Date: Wed, 29 Jun 2016 23:33:40 +0200
Subject: Responsive home page

---
 src/server/Design/Header.hs | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

(limited to 'src/server/Design/Header.hs')

diff --git a/src/server/Design/Header.hs b/src/server/Design/Header.hs
index 4e31891..8feac64 100644
--- a/src/server/Design/Header.hs
+++ b/src/server/Design/Header.hs
@@ -8,7 +8,6 @@ import Data.Monoid ((<>))
 
 import Clay
 
-import Design.Constants
 import Design.Color as Color
 import qualified Design.Media as Media
 
@@ -18,10 +17,12 @@ design = do
   display flex
   "flex-wrap" -: "wrap"
   lineHeightMedia
-  marginBottom blockMarginBottom
   position relative
   backgroundColor Color.chestnutRose
   color Color.white
+  Media.desktop $ marginBottom (em 3)
+  Media.mobileTablet $ marginBottom (em 2)
+  Media.mobile $ marginBottom (em 1.5)
 
   ".title" <> ".item" ? headerPadding
 
@@ -62,10 +63,12 @@ design = do
 
 lineHeightMedia :: Css
 lineHeightMedia = do
+  Media.desktop $ lineHeight (px 80)
+  Media.tablet $ lineHeight (px 65)
   Media.mobile $ lineHeight (px 50)
-  Media.tabletDesktop $ lineHeight (px 80)
 
 heightMedia :: Css
 heightMedia = do
+  Media.desktop $ height (px 80)
+  Media.tablet $ height (px 65)
   Media.mobile $ height (px 50)
-  Media.tabletDesktop $ height (px 80)
-- 
cgit v1.2.3