diff options
| author | Joe Crayne <joe@jerkface.net> | 2019-11-30 19:34:26 -0500 |
|---|---|---|
| committer | Joe Crayne <joe@jerkface.net> | 2020-01-01 23:22:52 -0500 |
| commit | 06bc74fb8fccb4b8a19d7a204df79c222791e677 (patch) | |
| tree | 78edb30a0bb4ae16eba413fe48925153efddc468 /dht/src/Network/Tox/Onion/Handlers.hs | |
| parent | 2f823f082afc9f7501f2672435ca764e964a3bae (diff) | |
Debug print upon toxid garbage collection.
Diffstat (limited to 'dht/src/Network/Tox/Onion/Handlers.hs')
| -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 |