From 9307ec526308f55340b95e199d6aad0850d17d04 Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Sat, 10 Jan 2015 22:15:51 +0100 Subject: Ensure "Listening on 0.0.0.0:8000" message is not garbled --- tests/Hakyll/Core/Runtime/Tests.hs | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'tests') 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) -- cgit v1.2.3