Ameliore design in income page and stat page

1 files changed, 32 insertions, 0 deletions

diff --git a/src/server/Design/LoggedIn/Home/Pages.hs b/src/server/Design/LoggedIn/Home/Pages.hs
new file mode 100644
index 0000000..932865c
--- /dev/null
+++ b/src/server/Design/LoggedIn/Home/Pages.hs
@@ -0,0 +1,32 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+module Design.LoggedIn.Home.Pages
+  ( design
+  ) where
+
+import Clay
+
+import Design.Color as C
+import Design.Helper
+import Design.Constants
+
+design :: Css
+design = do
+  padding (px 30) (px 30) (px 30) (px 30)
+  textAlign (alignSide (sideCenter))
+  clearFix
+
+  ".page" ? do
+    defaultButton C.white C.darkGrey (px 50) focusDarken
+    display inlineBlock
+    border solid (px 2) C.darkGrey
+    marginRight (px 10)
+    paddingLeft (px 10)
+    paddingRight (px 10)
+    fontWeight bold
+
+    ":not(.current)" & cursor pointer
+
+    ".current" & do
+      borderColor C.red
+      color C.red