{-# LANGUAGE OverloadedStrings #-} module Design.SignIn ( signInDesign ) where import Clay import Design.Color as C import Design.Helper signInDesign :: Css signInDesign = ".signIn" ? do button ? do display block margin (em 5) auto (em 2) auto iconButton C.blue C.white (em 2.5) fontSize (em 1.5) position relative ".result" ? do textAlign (alignSide sideCenter) ".success" ? color C.greenSuccess ".error" ? color C.redError