aboutsummaryrefslogtreecommitdiff
path: root/server/src/Design/View/Payment/Form.hs
blob: aada12b25d22e565f2bce23eeaa7a5966d7617d8 (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
30
31
32
33
34
35
module Design.View.Payment.Form
  ( design
  ) where

import           Clay

import qualified Design.Color     as Color
import qualified Design.Constants as Constants
import qualified Design.Helper    as Helper

design :: Css
design = do
  ".formHeader" ? do
    backgroundColor Color.chestnutRose
    fontSize (px 18)
    color Color.white
    sym2 padding (px 20) (px 30)
    textAlign (alignSide sideCenter)
    borderRadius (px 5) (px 5) (px 0) (px 0)

  ".formContent" ? do
    sym2 padding (px 20) (px 30)

    ".buttons" ? do
      display flex
      justifyContent spaceAround
      marginTop (em 1.5)

      ".confirm" ?
        Helper.button Color.chestnutRose Color.white (px Constants.inputHeight) Constants.focusLighten
      ".undo" ?
        Helper.button Color.silver Color.white (px Constants.inputHeight) Constants.focusLighten

      (".confirm" <> ".undo") ?
        width (px 90)