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 cbfa06bd717dcfeb32f30c4047182afb32cb7701 (commit)
from 9bd94c33fb00b9e37aea671d72240d1a5c9a0571 (commit)
Summary of changes:
test/suite/Snap/Util/FileServe/Tests.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 cbfa06bd717dcfeb32f30c4047182afb32cb7701
Author: Gregory Collins <[email protected]>
Date: Mon Aug 30 18:26:20 2010 -0400
Fix another mapM_ issue
diff --git a/test/suite/Snap/Util/FileServe/Tests.hs
b/test/suite/Snap/Util/FileServe/Tests.hs
index a0bbaa4..bf99a90 100644
--- a/test/suite/Snap/Util/FileServe/Tests.hs
+++ b/test/suite/Snap/Util/FileServe/Tests.hs
@@ -137,6 +137,6 @@ testFsSingle = testCase "fileServeSingle" $ do
coverMimeMap :: (Monad m) => m ()
-coverMimeMap = mapM_ f $ Map.toList defaultMimeTypes
+coverMimeMap = Prelude.mapM_ f $ Map.toList defaultMimeTypes
where
f (!k,!v) = return $ case k `seq` v `seq` () of () -> ()
-----------------------------------------------------------------------
hooks/post-receive
--
snap-core
_______________________________________________
Snap mailing list
[email protected]
http://mailman-mail5.webfaction.com/listinfo/snap
