diff --git a/test/Spec.hs b/test/Spec.hs
index 126cc8a..57a10a4 100644
--- a/test/Spec.hs
+++ b/test/Spec.hs
@@ -1,16 +1,21 @@
 
-import qualified TestTypes
 import qualified TestBrokerClient
 import qualified TestBrokerProtocol
 import qualified TestBrokerServer
 import qualified TestQuoteSourceClient
 import qualified TestQuoteSourceServer
+import qualified TestTypes
 import qualified TestZMQTradeSink
 
-import Test.Tasty
+import           Test.Tasty
+
+import           System.Log.Logger
 
 main :: IO ()
-main = defaultMain $ testGroup "Tests" [properties, unitTests]
+main = do
+  logger <- getRootLogger
+  updateGlobalLogger "" (setLevel EMERGENCY)
+  defaultMain $ testGroup "Tests" [properties, unitTests]
 
 properties :: TestTree
 properties = testGroup "Properties" [TestTypes.properties, TestBrokerProtocol.properties]