1 files changed, 1 insertions, 1 deletions

diff --git a/examples/dhtd.hs b/examples/dhtd.hs
index 4ec4a3f4..6161fbb4 100644
--- a/examples/dhtd.hs
+++ b/examples/dhtd.hs
@@ -1686,7 +1686,7 @@ onNewToxSession sv ssvar ContactInfo{accounts} addrTox netcrypto = do
                 return c
             Just c  -> return c
 
-    addDestroySessionHook netcrypto (Just 0) $ delSession c . fromIntegral . ncSessionId
+    atomically $ Tox.addDestroySessionHook netcrypto (Just 0) $ void . delSession c . fromIntegral . Tox.ncSessionId
     addSession c netcrypto
 
     return ()