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/Pages.hs | 39 +++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100644 src/server/Design/LoggedIn/Pages.hs

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

diff --git a/src/server/Design/LoggedIn/Pages.hs b/src/server/Design/LoggedIn/Pages.hs
new file mode 100644
index 0000000..c42e9f3
--- /dev/null
+++ b/src/server/Design/LoggedIn/Pages.hs
@@ -0,0 +1,39 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+module Design.LoggedIn.Pages
+  ( pagesDesign
+  ) where
+
+import Clay
+
+import Design.Color as C
+import Design.Helper
+import Design.Constants
+
+pagesDesign :: Css
+pagesDesign =
+
+  ".pages" ? do
+    padding (px 30) (px 30) (px 30) (px 30)
+    textAlign (alignSide (sideCenter))
+    clearFix
+
+    ".page" ? do
+      display inlineBlock
+      border solid (px 2) C.darkGrey
+      color C.darkGrey
+      borderRadius radius radius radius radius
+      marginRight (px 10)
+      let h = 50
+      paddingLeft (px 10)
+      paddingRight (px 10)
+      height (px h)
+      lineHeight (px h)
+      textAlign (alignSide (sideCenter))
+      fontWeight bold
+
+      ":not(.current)" & cursor pointer
+
+      ".current" & do
+        borderColor C.red
+        color C.red
-- 
cgit v1.2.3