1 files changed, 56 insertions, 0 deletions
diff --git a/src/server/Design/LoggedIn/Home/Header.hs b/src/server/Design/LoggedIn/Home/Header.hs
new file mode 100644
index 0000000..9008a95
--- /dev/null
+++ b/src/server/Design/LoggedIn/Home/Header.hs
@@ -0,0 +1,56 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+module Design.LoggedIn.Home.Header
+  ( design
+  ) where
+
+import Clay
+
+import Design.Constants
+
+import qualified Design.Helper as Helper
+import qualified Design.Color as Color
+import qualified Design.Constants as Constants
+
+design :: Css
+design = do
+  marginBottom blockMarginBottom
+  marginLeft (pct blockPercentMargin)
+  marginRight (pct blockPercentMargin)
+
+  ".exceedingPayers" ? do
+    backgroundColor Color.mossGreen
+    padding (px 10) (px 10) (px 10) (px 10)
+    borderRadius (px 5) (px 5) (px 5) (px 5)
+    color Color.white
+    marginBottom (em 1)
+
+    ".exceedingPayer:not(:last-child)::after" ? content (stringContent ", ")
+
+    ".userName" ? marginRight (px 5)
+
+  ".searchLine" ? do
+    marginBottom (em 1)
+    form ? do
+      display inlineBlock
+
+      ".textInput" ? do
+        display inlineBlock
+        marginRight (px 30)
+        marginBottom (px 0)
+
+      ".radioGroup" ? do
+        display inlineBlock
+        marginBottom (px 0)
+        ".title" ? display none
+
+    ".addPayment" ? do
+      Helper.defaultButton Color.chestnutRose Color.white (px 47) Constants.focusLighten
+      float floatRight
+
+  ".infos" ? do
+    lineHeight (px Constants.inputHeight)
+
+    ".partition" ? do
+      color Color.dustyGray
+      marginLeft (px 15)