blob: c44c67bf3461a9fadd6d8c7a49b888e930bc138a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
{-# LANGUAGE OverloadedStrings #-}
module Design.LoggedIn.Income
( design
) where
import Clay
import qualified Design.Helper as Helper
import qualified Design.Constants as Constants
import qualified Design.Color as Color
import qualified Design.Media as Media
design :: Css
design =
".monthlyNetIncomes" ? do
h1 ? do
Media.tabletDesktop $ float floatLeft
".addIncome" ? do
Helper.button Color.chestnutRose Color.white (px Constants.inputHeight) Constants.focusLighten
Media.tabletDesktop $ do
float floatRight
position relative
top (px (-8))
Media.mobile $ do
width (pct 100)
marginBottom (px 20)
|
