webby 0.1.0.2 → 0.1.1

raw patch · 3 files changed

+13/−2 lines, 3 files

Files

• src/Webby.hs +4/−0
• src/Webby/Server.hs +7/−0
• webby.cabal +2/−2

@@ -24,6 +24,7 @@   , params   , request   , requestBodyLength+  , getRequestBodyChunkAction    -- * Response modification   , setStatus@@ -36,6 +37,7 @@    -- * Application   , mkWebbyApp+  , Application    -- * Application context   , WEnv@@ -51,3 +53,5 @@  import           Webby.Server import           Webby.Types++import           Network.Wai  (Application)

@@ -9,6 +9,7 @@ import qualified Data.List                  as L import qualified Data.Text                  as T import           Network.HTTP.Types.URI     (queryToQueryText)+import           Network.Wai.Internal       (getRequestBodyChunk) import qualified System.Log.FastLogger      as FLog import           System.Log.FastLogger.Date (newTimeCache) import qualified UnliftIO.Concurrent        as Conc@@ -99,6 +100,12 @@  request :: WebbyM appEnv Request request = asks weRequest++-- | Returns an action that returns successive chunks of the rquest+-- body. It returns an empty bytestring after the request body is+-- consumed.+getRequestBodyChunkAction :: WebbyM appEnv (WebbyM appEnv ByteString)+getRequestBodyChunkAction = (liftIO . getRequestBodyChunk) <$> asks weRequest  headers :: WebbyM appEnv [Header] headers = requestHeaders <$> request

@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: dc7ce19d79dc28921965307e313bacc51c001940931db749783e1ee4e6bd5c2a+-- hash: caf3466bf704ca914cdc5415a14e4d717e7bdb21f42b4fc2ce0869bf6309d74b  name:           webby-version:        0.1.0.2+version:        0.1.1 synopsis:       A super-simple web server framework description:    A super-simple, easy to use web server framework inspired by                 Scotty. The goals of the project are: (1) Be easy to use (2) Allow