From a5e4a83139ed5490ed5f2de54e63de3c7a7b2988 Mon Sep 17 00:00:00 2001 From: Denis Tereshkin Date: Sat, 4 Dec 2021 13:28:57 +0700 Subject: [PATCH] QuoteSourceServer: remove logging --- src/ATrade/QuoteSource/Server.hs | 2 -- 1 file changed, 2 deletions(-) diff --git a/src/ATrade/QuoteSource/Server.hs b/src/ATrade/QuoteSource/Server.hs index 7ea9505..04fe793 100644 --- a/src/ATrade/QuoteSource/Server.hs +++ b/src/ATrade/QuoteSource/Server.hs @@ -27,7 +27,6 @@ import Data.Maybe (Maybe (Just, Nothing)) import qualified Data.Text as T import qualified Data.Text.Encoding as E import Prelude hiding ((!!)) -import System.Log.Logger (debugM) import System.ZMQ4 (Context, Pub (..), Socket, bind, close, restrict, send, sendMulti, setCurveServer, @@ -52,7 +51,6 @@ data QuoteSourceServerData = QSSTick Tick | QSSBar (BarTimeframe, Bar) | QSSHear serverThread :: QuoteSourceServer -> IO () serverThread state = do finally serverThread' cleanup - debugM "QuoteSource" "server thread done" where cleanup = do close $ outSocket state