hablo/src/Main.hs

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
  )
Initial draft 2019-01-27 21:41:21 +01:00			`module Main where`

Add two arguments to pass HTML files for the head and the banner of pages 2019-02-02 17:26:07 +01:00			`import qualified Arguments (get)`
Add a module to handle pages with articles list and generate HTML pages for articles too 2019-02-03 22:56:21 +01:00			`import qualified Blog (build)`
Split Dom templating and HTML generation process, make a separate module for articles to start scanning their content a bit 2019-02-02 23:23:05 +01:00			`import qualified HTML (generate)`
Compile several JS files into a single one, including the JSON blog DB as well 2019-02-06 17:16:52 +01:00			`import qualified JS (generate)`
Initial draft 2019-01-27 21:41:21 +01:00			`import Control.Monad.Reader (runReaderT)`

			`main :: IO ()`
			`main = do`
Add two arguments to pass HTML files for the head and the banner of pages 2019-02-02 17:26:07 +01:00			`Arguments.get`
Add a module to handle pages with articles list and generate HTML pages for articles too 2019-02-03 22:56:21 +01:00			`>>= Blog.build`
Initial draft 2019-01-27 21:41:21 +01:00			`>>= runReaderT (do`
Split Dom templating and HTML generation process, make a separate module for articles to start scanning their content a bit 2019-02-02 23:23:05 +01:00			`HTML.generate`
Compile several JS files into a single one, including the JSON blog DB as well 2019-02-06 17:16:52 +01:00			`JS.generate`
Initial draft 2019-01-27 21:41:21 +01:00			`)`