{-# LANGUAGE OverloadedStrings #-}

module Design.LoggedIn.Pages
  ( pagesDesign
  ) where

import Clay

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

pagesDesign :: Css
pagesDesign =

  ".pages" ? do
    padding (px 30) (px 30) (px 30) (px 30)
    textAlign (alignSide (sideCenter))
    clearFix

    ".page" ? do
      defaultButton C.white C.darkGrey (px 50) focusDarken
      display inlineBlock
      border solid (px 2) C.darkGrey
      marginRight (px 10)
      paddingLeft (px 10)
      paddingRight (px 10)
      fontWeight bold

      ":not(.current)" & cursor pointer

      ".current" & do
        borderColor C.red
        color C.red