From a94813019b146d75f7556d10e8d0dfd50586f54d Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 13 Sep 2015 11:23:04 +0200
Subject: Splitting Global design file into a hierarchy of files

---
 src/server/Design/LoggedIn/Expandables.hs | 37 +++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 src/server/Design/LoggedIn/Expandables.hs

(limited to 'src/server/Design/LoggedIn/Expandables.hs')

diff --git a/src/server/Design/LoggedIn/Expandables.hs b/src/server/Design/LoggedIn/Expandables.hs
new file mode 100644
index 0000000..3807da4
--- /dev/null
+++ b/src/server/Design/LoggedIn/Expandables.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+module Design.LoggedIn.Expandables
+  ( expandablesDesign
+  ) where
+
+import Clay
+
+import Design.Color as C
+import Design.Helper
+import Design.Constants
+
+expandablesDesign :: Css
+expandablesDesign =
+
+  ".expandables" ? do
+
+    ".expand" ? do
+      position absolute
+      right blockPadding
+      bottom (px 2)
+
+    ".monthlyPayments" ? expandBlock C.blue C.white (px inputHeight)
+
+    ".account" ? do
+      expandBlock C.green C.white (px inputHeight)
+
+      ".header" |> ".exceedingPayer" ? do
+        lineHeight (px inputHeight)
+        ".userName" ? marginRight (px 10)
+
+      ".income" ? do
+        backgroundColor C.lightGrey
+        lineHeight rowHeight
+        padding (px 0) (px 20) (px 0) (px 20)
+
+    ".detail" |> ".header" ? borderRadius radius radius 0 0
-- 
cgit v1.2.3