module Network.Loli.Config where
import Hack
import Hack.Contrib.Middleware.Config
import Hack.Contrib.Middleware.ContentLength
import Hack.Contrib.Middleware.ContentType
import Network.Loli.Utils
import Prelude hiding ((.), (>), (^), ())
pre_installed_middlewares :: [Middleware]
pre_installed_middlewares =
[
content_length
, content_type default_content_type
, config set_view_root
]
where
set_view_root = set_namespace loli_config loli_views loli_default_views
default_content_type :: String
default_content_type = "text/plain; charset=UTF-8"
loli_captures :: String
loli_locals :: String
loli_partials :: String
loli_config :: String
loli_layout :: String
loli_views :: String
loli_default_views :: String
loli_layout_content :: String
loli_captures = "loli-captures-"
loli_locals = "loli-locals-"
loli_partials = "loli-partials-"
loli_config = "loli-config-"
loli_layout = "layout"
loli_views = "views"
loli_default_views = "views"
loli_layout_content = "content"