summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--examples/dhtd.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/dhtd.hs b/examples/dhtd.hs
index fce976db..ea94b7ce 100644
--- a/examples/dhtd.hs
+++ b/examples/dhtd.hs
@@ -819,7 +819,7 @@ clientSession s@Session{..} sock cnum h = do
819 | otherwise = [show n, "error!",""] 819 | otherwise = [show n, "error!",""]
820 r = map (uncurry showRecord) $ IntMap.toAscList rs 820 r = map (uncurry showRecord) $ IntMap.toAscList rs
821 return $ do 821 return $ do
822 hPutClientChunk h $ "trampolines: " ++ show (IntMap.size ts,tcnt) ++ "\n" 822 hPutClientChunk h $ "trampolines: " ++ show (IntMap.size ts,tcnt,icnt) ++ "\n"
823 hPutClient h $ showColumns $ ["","responses","timeouts"]:r 823 hPutClient h $ showColumns $ ["","responses","timeouts"]:r
824 824
825 -- necrypto <FRIEND-TOXID> 825 -- necrypto <FRIEND-TOXID>