summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/Hakyll/Core/Runtime/Tests.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/Hakyll/Core/Runtime/Tests.hs b/tests/Hakyll/Core/Runtime/Tests.hs
index 3488dba..af85f4f 100644
--- a/tests/Hakyll/Core/Runtime/Tests.hs
+++ b/tests/Hakyll/Core/Runtime/Tests.hs
@@ -29,9 +29,9 @@ case01 = withTestConfiguration $ \config -> do
match "*.md" $ do
route $ setExtension "html"
compile $ do
- body <- getResourceBody
- saveSnapshot "raw" body
- return $ renderPandoc body
+ getResourceBody
+ >>= saveSnapshot "raw"
+ >>= return . renderPandoc
match "bodies.txt" $ do
route idRoute