{-# 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)