{-# LANGUAGE OverloadedStrings #-}

module Design.LoggedIn.Home.Expandables
  ( design
  ) where

import Clay

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

design :: Css
design = do

  ".expand" ? do
    position absolute
    right blockPadding
    bottom (px 2)

  ".monthlyPayments" ? expandBlock Color.gothic Color.white (px inputHeight)

  ".account" ? do
    expandBlock Color.mossGreen Color.white (px inputHeight)
    ".userName" ? marginRight (px 10)

  ".detail" |> ".header" ? borderRadius radius radius 0 0