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-website".
The branch, master has been updated
via d140c3c43888ac2d45c0208c845dc9e280754f7b (commit)
from 7c3f730f47a55bb0fa3cc1cfbc92e0471632df37 (commit)
Summary of changes:
src/Main.hs | 1 +
1 files changed, 1 insertions(+), 0 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 d140c3c43888ac2d45c0208c845dc9e280754f7b
Author: Gregory Collins <[email protected]>
Date: Sat May 29 23:23:25 2010 -0400
Add exception logging to 500 handler
diff --git a/src/Main.hs b/src/Main.hs
index 674e176..49ffa05 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -114,6 +114,7 @@ catch500 m = (m >> return ()) `catch` \(e::SomeException)
-> do
writeText $ XH.escape t
writeBS "\n</pre></body></html>"
+ logError $ B.concat [ "caught exception: ", B.pack $ show e ]
where
r = setContentType "text/html" $
setResponseStatus 500 "Internal Server Error" emptyResponse
-----------------------------------------------------------------------
hooks/post-receive
--
snap-website
_______________________________________________
Snap mailing list
[email protected]
http://mailman-mail5.webfaction.com/listinfo/snap
