summaryrefslogtreecommitdiff
path: root/tests/Hakyll
diff options
context:
space:
mode:
authorJasper Van der Jeugt <m@jaspervdj.be>2015-01-10 22:15:51 +0100
committerJasper Van der Jeugt <m@jaspervdj.be>2015-01-10 22:16:05 +0100
commit9307ec526308f55340b95e199d6aad0850d17d04 (patch)
treec901aeac189f833a124026653eaf0e7ed5f2a2a5 /tests/Hakyll
parent23ab06de05a2da2b9c428d333d684690a580f3ba (diff)
downloadhakyll-9307ec526308f55340b95e199d6aad0850d17d04.tar.gz
Ensure "Listening on 0.0.0.0:8000" message is not garbled
Diffstat (limited to 'tests/Hakyll')
-rw-r--r--tests/Hakyll/Core/Runtime/Tests.hs6
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/Hakyll/Core/Runtime/Tests.hs b/tests/Hakyll/Core/Runtime/Tests.hs
index 1ca8dc1..73a3c6b 100644
--- a/tests/Hakyll/Core/Runtime/Tests.hs
+++ b/tests/Hakyll/Core/Runtime/Tests.hs
@@ -28,7 +28,8 @@ tests = testGroup "Hakyll.Core.Runtime.Tests" $
--------------------------------------------------------------------------------
case01 :: Assertion
case01 = do
- _ <- run testConfiguration Logger.Error $ do
+ logger <- Logger.new Logger.Error
+ _ <- run testConfiguration logger $ do
match "images/*" $ do
route idRoute
compile copyFileCompiler
@@ -65,7 +66,8 @@ case01 = do
--------------------------------------------------------------------------------
case02 :: Assertion
case02 = do
- _ <- run testConfiguration Logger.Error $ do
+ logger <- Logger.new Logger.Error
+ _ <- run testConfiguration logger $ do
match "images/favicon.ico" $ do
route $ gsubRoute "images/" (const "")
compile $ makeItem ("Test" :: String)