{- |
Module : Main
Description : Saeplog web server
Copyright : (c) Sebastian Witte
License : BSD3
Maintainer : woozletoff@gmail.com
Stability : experimental
-}
module Main where
import System.Exit
import System.IO
import Web.RBB (rbb)
main :: IO ()
main = rbb $ do
mapM_ (hPutStrLn stderr)
[ ""
, "You do not seem to have configured your web site at all!"
, ""
, "As you should decide how your site is going to look like, the"
, "default configuration does not do anything other than printing"
, "this help text."
, ""
, "To get you started on creating your own website with haskell and"
, "this blogging library, check out the documentation on github:"
, " https://github.com/saep/repo-based-blog"
, ""
]
exitFailure