bamboo-2009.6.8: src/Bamboo/Type/Theme.hs

{-# LANGUAGE NoImplicitPrelude #-}
module Bamboo.Type.Theme where

import Bamboo.Helper.PreludeEnv
import Data.Default

data ThemeConfig = ThemeConfig
  { name        :: String
  , css         :: [String]
  , js          :: [String]
  } deriving (Show, Read)

data ThemeConfigData = 
    Name
  | Css
  | Js
  deriving (Eq, Show, Read)

instance Default ThemeConfig where
  def = ThemeConfig def def def