{-# LANGUAGE OverloadedStrings #-} module Design.LoggedIn.Home.Search ( design ) where import Clay import Design.Constants import qualified Design.Helper as Helper import qualified Design.Color as Color import qualified Design.Constants as Constants design :: Css design = do marginBottom blockMarginBottom marginLeft (pct blockPercentMargin) marginRight (pct blockPercentMargin) ".textInput" ? do display inlineBlock marginRight (px 30) marginBottom (px 0) ".stat" ? do lineHeight (pct 100) ".addPayment" ? do Helper.defaultButton Color.chestnutRose Color.white (px Constants.inputHeight) Constants.focusLighten float floatRight