hablo/src/Main.hs

module Main where

import Arguments (Arguments(..), version)
import qualified Arguments (get)
import qualified Blog (build)
import Control.Monad.Reader (runReaderT)
import qualified HTML (generate)
import qualified JS (generate)
import qualified RSS (generate)
import System.Exit (exitSuccess)

main :: IO ()
main = Arguments.get >>= Blog.build >>= runReaderT
  (do HTML.generate
      JS.generate
      RSS.generate)
Initial draft 2019-01-27 21:41:21 +01:00			`module Main where`

Stop relying on cabal auto-generated stuff 2023-08-04 10:39:57 +02:00			`import Arguments (Arguments(..), version)`
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)`
Put a little responsability back into Main to avoid Arguments having control on main flow 2019-02-19 19:23:09 +01:00			`import Control.Monad.Reader (runReaderT)`
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)`
Implement RSS feeds generation 2020-03-25 19:47:28 +01:00			`import qualified RSS (generate)`
Put a little responsability back into Main to avoid Arguments having control on main flow 2019-02-19 19:23:09 +01:00			`import System.Exit (exitSuccess)`
Initial draft 2019-01-27 21:41:21 +01:00
			`main :: IO ()`
Clean the handling of --version argument, reusing the existing tools from optparse-applicative 2023-08-04 17:05:45 +02:00			`main = Arguments.get >>= Blog.build >>= runReaderT`
			`(do HTML.generate`
			`JS.generate`
			`RSS.generate)`