From 4c1f0f9a4e4ee68aab098a61d3749960f568ec7f Mon Sep 17 00:00:00 2001 From: Mirek Kratochvil Date: Thu, 8 Jun 2023 13:51:30 +0200 Subject: install files properly --- Types.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'Types.hs') diff --git a/Types.hs b/Types.hs index 12088b6..8e53611 100644 --- a/Types.hs +++ b/Types.hs @@ -44,6 +44,8 @@ data SiteState = , _defaultTemplate :: FilePath -- ^ Name of the default template , _redirectTemplate :: FilePath -- ^ Name of the template for redirect pages , _tagTemplate :: FilePath -- ^ Name of the template for tag listing pages + , _urlBase :: FilePath -- ^ "Root route" to prepend to all absolute links. + , _dumpFinalState :: Bool -- ^ Triggers printing out the structure when the processing finishes. } deriving (Show) @@ -63,6 +65,8 @@ emptySiteState = , _defaultTemplate = "default.html" , _redirectTemplate = "redirect.html" , _tagTemplate = "tag.html" + , _urlBase = "/" + , _dumpFinalState = False } -- | Monad for running the site generator. -- cgit v1.2.3