summaryrefslogtreecommitdiff
path: root/Mainline.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Mainline.hs')
-rw-r--r--Mainline.hs3
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
681 io2 <- touchBucket mainlineSpace (15*60) var sched tr 681 io2 <- touchBucket mainlineSpace (15*60) var sched tr
682 return $ do 682 return $ do
683 io1 >> io2 683 io1 >> io2
684 {- noisy (timestamp updates are currently reported as transitions to Accepted)
684 hPutStrLn stderr $ unwords 685 hPutStrLn stderr $ unwords
685 [ show (transitionedTo tr) 686 [ show (transitionedTo tr)
686 , show (transitioningNode tr) 687 , show (transitioningNode tr)
687 ] 688 ] -}
688 } 689 }
689 690
690 691