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, 0.3 has been updated
via d3b9b120e9b33b6806d58c430eaf66d2f0768df5 (commit)
from 03f10c85207022df080b63b989cd9d14791d67cd (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 d3b9b120e9b33b6806d58c430eaf66d2f0768df5
Author: Shane <[email protected]>
Date: Wed Jun 30 19:21:39 2010 +0100
Accidentally undid Carl's change "Change the type signature of finishWith
to result in Snap a". Fixed that now.
diff --git a/src/Snap/Internal/Types.hs b/src/Snap/Internal/Types.hs
index be3fb08..ae5fd05 100644
--- a/src/Snap/Internal/Types.hs
+++ b/src/Snap/Internal/Types.hs
@@ -309,7 +309,7 @@ unsafeDetachRequestBody = do
------------------------------------------------------------------------------
-- | Short-circuits a 'Snap' monad action early, storing the given
-- 'Response' value in its state.
-finishWith :: MonadSnap m => Response -> m ()
+finishWith :: MonadSnap m => Response -> m a
finishWith = liftSnap . Snap . return . Just . Left
{-# INLINE finishWith #-}
-----------------------------------------------------------------------
hooks/post-receive
--
snap-core
_______________________________________________
Snap mailing list
[email protected]
http://mailman-mail5.webfaction.com/listinfo/snap
