diff options
Diffstat (limited to 'dht/src/Network/Tox/Onion')
-rw-r--r-- | dht/src/Network/Tox/Onion/Handlers.hs | 1 |
1 files changed, 1 insertions, 0 deletions
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 | |||
181 | fix $ \loop -> do | 181 | fix $ \loop -> do |
182 | cutoff <- getPOSIXTime | 182 | cutoff <- getPOSIXTime |
183 | threadDelay 300000000 -- 300 seconds | 183 | threadDelay 300000000 -- 300 seconds |
184 | dput XAnnounce "(gc:toxids) Garbage collecting announced toxids." | ||
184 | join $ atomically $ do | 185 | join $ atomically $ do |
185 | fix $ \gc -> do | 186 | fix $ \gc -> do |
186 | keys <- readTVar db | 187 | keys <- readTVar db |