1 files changed, 2 insertions, 2 deletions

diff --git a/Presence/ServerC.hs b/Presence/ServerC.hs
index ae0bf154..b16a0099 100644
--- a/Presence/ServerC.hs
+++ b/Presence/ServerC.hs
@@ -125,9 +125,9 @@ packets h = do
 
 outgoing :: MonadIO m => Handle -> Sink S.ByteString m ()
 outgoing h = do
-    liftIO . L.putStrLn $ "outgoing: waiting"
+    -- liftIO . L.putStrLn $ "outgoing: waiting"
     mpacket <- await
-    liftIO . L.putStrLn $ "outgoing: got packet " <++> bshow mpacket
+    -- liftIO . L.putStrLn $ "outgoing: got packet " <++> bshow mpacket
     maybe (return ()) 
           (\r -> (liftIO . S.hPutStrLn h $ r) >> outgoing h) 
           mpacket