module Main where

import qualified Arguments (get)
import qualified Blog (build)
import qualified HTML (generate)
import qualified JS (generate)
import Control.Monad.Reader (runReaderT)

main :: IO ()
main = do
  Arguments.get
  >>= Blog.build
  >>= runReaderT (do
    HTML.generate
    JS.generate
  )