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-server".
The branch, master has been updated
via ae2f4328c1744d4fdfffd180a8149b1786668517 (commit)
from c4ef91a51c885a8a9a5d24ed701835d636a540b0 (commit)
Summary of changes:
src/Snap/Internal/Http/Server/SimpleBackend.hs | 3 ++-
1 files changed, 2 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 ae2f4328c1744d4fdfffd180a8149b1786668517
Author: Gregory Collins <[email protected]>
Date: Sat Feb 5 16:02:05 2011 -0500
Close #49: eat suicide exception in simple backend
diff --git a/src/Snap/Internal/Http/Server/SimpleBackend.hs
b/src/Snap/Internal/Http/Server/SimpleBackend.hs
index 3a7e489..721830f 100644
--- a/src/Snap/Internal/Http/Server/SimpleBackend.hs
+++ b/src/Snap/Internal/Http/Server/SimpleBackend.hs
@@ -121,7 +121,8 @@ acceptThread defaultTimeout handler tt elog cpu sock = loop
cleanup =
[
- Handler $ \(e :: SomeException) -> elog
+ Handler $ \(_ :: AsyncException) -> return ()
+ , Handler $ \(e :: SomeException) -> elog
$ S.concat [ "SimpleBackend.acceptThread: "
, S.pack . map c2w $ show e]
]
-----------------------------------------------------------------------
hooks/post-receive
--
snap-server
_______________________________________________
Snap mailing list
[email protected]
http://mailman-mail5.webfaction.com/listinfo/snap
