This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "snap-core".
The branch, master has been updated
via cdb3f05214a415e32b0fb38ae14097908cfe3db9 (commit)
from fec61228361171a00e03484b7aebc2d1f0f4ff3d (commit)
Summary of changes:
src/Snap/Internal/Types.hs | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit cdb3f05214a415e32b0fb38ae14097908cfe3db9
Author: Bryan O'Sullivan <[email protected]>
Date: Thu Sep 2 15:17:09 2010 -0700
Correct the type of finishWith
diff --git a/src/Snap/Internal/Types.hs b/src/Snap/Internal/Types.hs
index 89b9552..4b6433b 100644
--- a/src/Snap/Internal/Types.hs
+++ b/src/Snap/Internal/Types.hs
@@ -223,7 +223,7 @@ unsafeDetachRequestBody = do
------------------------------------------------------------------------------
-- | Short-circuits a 'Snap' monad action early, storing the given
-- 'Response' value in its state.
-finishWith :: Response -> Snap ()
+finishWith :: Response -> Snap a
finishWith = Snap . return . Just . Left
{-# INLINE finishWith #-}
-----------------------------------------------------------------------
hooks/post-receive
--
snap-core
_______________________________________________
Snap mailing list
[email protected]
http://mailman-mail5.webfaction.com/listinfo/snap
