Skip to content

Instantly share code, notes, and snippets.

@taksuyu
Created February 9, 2015 03:40
Show Gist options
  • Save taksuyu/d9d08d042b283193a7a8 to your computer and use it in GitHub Desktop.
Save taksuyu/d9d08d042b283193a7a8 to your computer and use it in GitHub Desktop.
Hakyll almost default CSS in Clay
{-# LANGUAGE OverloadedStrings #-}
module Css.Default where
import Clay
import Prelude ()
defaultStyleSheet :: Css
defaultStyleSheet = do
body ? do
background black
fontSize (px 16)
margin (px 0) auto (px 0) auto
width (px 600)
header ? do
borderBottom solid (px 2) black
marginBottom (px 30)
padding (px 12) (px 0) (px 12) (px 0)
"#navigation" ? do
textAlign (alignSide sideRight)
a ? do
color black
fontSize (px 18)
fontWeight bold
marginLeft (px 12)
textDecoration none
textTransform uppercase
div # "#logo" ? a ? do
color black
float floatLeft
fontSize (px 18)
fontWeight bold
textDecoration none
div # "#content" ? h1 ? do
borderBottom solid (px 2) black
div # ".info" ? do
color "#555"
fontSize (px 14)
fontStyle italic
footer ? do
color "#555"
fontSize (px 12)
marginTop (px 30)
padding (px 12) (px 0) (px 12) (px 0)
textAlign (alignSide sideCenter)
h1 ? do
fontSize (px 24)
h2 ? do
fontSize (px 20)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment