Skip to content
Snippets Groups Projects
Verified Commit 148bec7f authored by jan.hamal.dvorak's avatar jan.hamal.dvorak
Browse files

Add missing documentation strings

parent fe1bf0cd
No related branches found
No related tags found
No related merge requests found
...@@ -334,6 +334,9 @@ where ...@@ -334,6 +334,9 @@ where
getPathInfo = pathInfo <$> getRequest getPathInfo = pathInfo <$> getRequest
-- |
-- Obtain request path as an unsplit 'Text'.
--
getPathInfoRaw :: (MonadAction m) => m Text getPathInfoRaw :: (MonadAction m) => m Text
getPathInfoRaw = cs <$> rawPathInfo <$> getRequest getPathInfoRaw = cs <$> rawPathInfo <$> getRequest
...@@ -976,6 +979,10 @@ where ...@@ -976,6 +979,10 @@ where
-- Finalizing -------------------------------------------------------------- -- Finalizing --------------------------------------------------------------
-- |
-- Register an IO action to run once the request is either handler
-- or fails with an error.
--
registerFinalizer :: (MonadAction m) => IO a -> m () registerFinalizer :: (MonadAction m) => IO a -> m ()
registerFinalizer fin = do registerFinalizer fin = do
modifyActionField aeFinalize (fin >>) modifyActionField aeFinalize (fin >>)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment