aboutsummaryrefslogtreecommitdiff
path: root/src/server/Design/LoggedIn.hs
diff options
context:
space:
mode:
authorJoris2016-04-05 23:52:13 +0200
committerJoris2016-04-05 23:52:13 +0200
commitfe50c4042848681833d15fab27466d1d2d4bda45 (patch)
tree9a1eda4adb22c0d84815e20e8e021968815d7c50 /src/server/Design/LoggedIn.hs
parent466f77394885cb74d01451c4733cafc9b61f4bba (diff)
downloadbudget-fe50c4042848681833d15fab27466d1d2d4bda45.tar.gz
budget-fe50c4042848681833d15fab27466d1d2d4bda45.tar.bz2
budget-fe50c4042848681833d15fab27466d1d2d4bda45.zip
Ameliore design in income page and stat page
Diffstat (limited to 'src/server/Design/LoggedIn.hs')
-rw-r--r--src/server/Design/LoggedIn.hs32
1 files changed, 13 insertions, 19 deletions
diff --git a/src/server/Design/LoggedIn.hs b/src/server/Design/LoggedIn.hs
index d35276b..63ff413 100644
--- a/src/server/Design/LoggedIn.hs
+++ b/src/server/Design/LoggedIn.hs
@@ -1,28 +1,22 @@
{-# LANGUAGE OverloadedStrings #-}
module Design.LoggedIn
- ( loggedInDesign
+ ( design
) where
-import Clay
-
-import Design.LoggedIn.Add
-import Design.LoggedIn.Expandables
-import Design.LoggedIn.Table
-import Design.LoggedIn.Pages
-import Design.Animation.Opacity
-
-loggedInDesign :: Css
-loggedInDesign =
+import Data.Monoid ((<>))
- ".loggedIn" ? do
-
- opacityAnimation
-
- addDesign
+import Clay
- expandablesDesign
+import qualified Design.LoggedIn.Home as HomeDesign
+import qualified Design.LoggedIn.Income as IncomeDesign
+import qualified Design.LoggedIn.Stat as StatDesign
- tableDesign
+design :: Css
+design = do
+ ".home" ? HomeDesign.design
+ ".income" ? IncomeDesign.design
+ ".stat" ? StatDesign.design
- pagesDesign
+ (".income" <> ".stat") ? do
+ "margin" -: "0 2vw"