quieter Mainline debug prints

1 files changed, 2 insertions, 1 deletions

diff --git a/Mainline.hs b/Mainline.hs
index 1afb580b..8ff13390 100644
--- a/Mainline.hs
+++ b/Mainline.hs
@@ -681,10 +681,11 @@ mainlineKademlia client committee var sched
                         io2 <- touchBucket mainlineSpace (15*60) var sched tr
                         return $ do
                             io1 >> io2
+                            {-  noisy (timestamp updates are currently reported as transitions to Accepted)
                             hPutStrLn stderr $ unwords
                                 [ show (transitionedTo tr)
                                 , show (transitioningNode tr)
-                                ]
+                                ] -}
                    }