Skip to content

Instantly share code, notes, and snippets.

@tych0
Created May 30, 2013 20:11
Show Gist options
  • Save tych0/5680769 to your computer and use it in GitHub Desktop.
Save tych0/5680769 to your computer and use it in GitHub Desktop.
data HaggisConfig = HaggisConfig {
-- | Path to where the files are hosted, e.g: /foo, /, /foo/bar/, defaults
-- to /
sitePath :: String,
-- | Default author, so you don't have to put an author in every post's
-- metadata.
defaultAuthor :: Maybe String,
-- | Hostname where the blog is hosted, used for generating RSS feed links.
-- E.g. blog.example.com, blog.example.com:8080
siteHost :: Maybe String,
rssTitle :: Maybe String,
rssDescription :: Maybe String,
-- | Sqlite3 file name, for comments.
sqlite3File :: Maybe FilePath,
siteTemplates :: SiteTemplates,
bindPage :: HaggisConfig -> Page -> [Node] -> [Node]
bindComment :: HaggisConfig -> Comment -> [Node] -> [Node]
bindSpecial :: HaggisConfig -> [MultiPage] -> [Node] -> [Node]
} deriving (Show)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment