module Design.View.NotFound
  ( design
  ) where

import           Clay
import           Prelude      hiding (rem)

import qualified Design.Color as Color

design :: Css
design = do

  marginLeft (rem 3)

  ".link" ? do
    display block
    marginTop (rem 1)
    color Color.chestnutRose
    textDecoration underline
    hover &
      color (Color.chestnutRose +. 15)