From c1f44a5890fbb26faf6f17c676662ea1bd495f2e Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 4 Sep 2015 09:52:20 +0200
Subject: Adding paging (need some fixes)

---
 src/server/Design/Global.hs | 24 ++++++++++++++++++++++--
 1 file changed, 22 insertions(+), 2 deletions(-)

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

diff --git a/src/server/Design/Global.hs b/src/server/Design/Global.hs
index 4933300..5efb2bf 100644
--- a/src/server/Design/Global.hs
+++ b/src/server/Design/Global.hs
@@ -78,7 +78,7 @@ global = do
           display inlineBlock
           width (px 60)
           textAlign (alignSide sideCenter)
-          backgroundColor C.darkgrey
+          backgroundColor C.darkGrey
           color C.white
           height (px inputHeight)
           lineHeight (px inputHeight)
@@ -167,6 +167,26 @@ global = do
           color C.white
           visibility hidden
 
+    ".pages" ? do
+      padding (px 30) (px 30) (px 30) (px 30)
+      clearFix
+      ".page" ? do
+        border solid (px 2) C.darkGrey
+        borderRadius (px 2) (px 2) (px 2) (px 2)
+        marginRight (px 10)
+        cursor pointer
+        let side = 50
+        width (px side)
+        height (px side)
+        lineHeight (px side)
+        textAlign (alignSide (sideCenter))
+        float floatLeft
+        fontWeight bold
+
+        ".current" & do
+          borderColor C.red
+          color C.red
+
   ".signIn" ? do
 
     form ? do
@@ -214,6 +234,6 @@ defaultInput inputHeight = do
   height (px inputHeight)
   padding (px 10) (px 10) (px 10) (px 10)
   borderRadius (px 3) (px 3) (px 3) (px 3)
-  border solid (px 1) C.darkgrey
+  border solid (px 1) C.darkGrey
   focus & borderColor C.grey
   verticalAlign middle
-- 
cgit v1.2.3