From 06bc74fb8fccb4b8a19d7a204df79c222791e677 Mon Sep 17 00:00:00 2001 From: Joe Crayne Date: Sat, 30 Nov 2019 19:34:26 -0500 Subject: Debug print upon toxid garbage collection. --- dht/src/Network/Tox/Onion/Handlers.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'dht/src/Network/Tox/Onion/Handlers.hs') diff --git a/dht/src/Network/Tox/Onion/Handlers.hs b/dht/src/Network/Tox/Onion/Handlers.hs index f44dd79c..25713aa1 100644 --- a/dht/src/Network/Tox/Onion/Handlers.hs +++ b/dht/src/Network/Tox/Onion/Handlers.hs @@ -181,6 +181,7 @@ forkAnnouncedKeysGC db = forkIO $ do fix $ \loop -> do cutoff <- getPOSIXTime threadDelay 300000000 -- 300 seconds + dput XAnnounce "(gc:toxids) Garbage collecting announced toxids." join $ atomically $ do fix $ \gc -> do keys <- readTVar db -- cgit v1.2.3