module Network.Miku.Config where
import Hack2
import Hack2.Contrib.Middleware.Config
import Hack2.Contrib.Middleware.ContentLength
import Hack2.Contrib.Middleware.ContentType
import Network.Miku.Utils
import Prelude hiding ((.), (>), (^), ())
import Data.ByteString.Lazy.Char8 (ByteString)
pre_installed_middlewares :: [Middleware]
pre_installed_middlewares =
[
content_length
, content_type default_content_type
]
where
default_content_type = "text/plain; charset=UTF-8"
miku_captures :: ByteString
miku_captures = "miku-captures-"