minor improvements: replace print with Log (#1700)

hstreamdb · Nov 29, 2023 · 3a7ea13 · 3a7ea13
1 parent 859ead3
commit 3a7ea13
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/hstream-kafka/HStream/Kafka/Network.hs b/hstream-kafka/HStream/Kafka/Network.hs
@@ -212,7 +212,8 @@ startTCPServer ServerOptions{..} server = do
         -- @conn@) before proper cleanup of @conn@ is your case
         forkFinally (server (conn, peer)) $ \e -> do
           case e of
-            Left err -> print err >> N.gracefulClose conn 5000
+            Left err -> do Log.fatal (Log.buildString' err)
+                           N.gracefulClose conn 5000
             Right _  -> pure ()
 
 -------------------------------------------------------------------------------