{-# LANGUAGE OverloadedStrings #-}

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

import Clay

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

design :: Css
design = do

  expandBlock Color.gothic Color.white (px inputHeight)

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

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