Header.hs

module Panda.View.Theme.BluePrint.Template.Header where

import Panda.Helper.Env
import Prelude hiding ((.), (/), id, span)
import qualified Panda.Config.Global as Config


html_head  = header << [meta_tag, title_tag, screen_css, wp_css, custom_css, rss_tag]

title_tag  = thetitle << Config.blog_title
screen_css = css_link "/theme/blueprint/wp/css/screen.css"
wp_css     = css_link "/theme/blueprint/wp/css/blueprint-wp.css"
custom_css = css_link "/theme/blueprint/wp/css/custom.css"
rss_tag    = rss_link "rss.xml"