diff options
| author | Joe Crayne <joe@jerkface.net> | 2018-11-03 03:14:51 -0400 |
|---|---|---|
| committer | Joe Crayne <joe@jerkface.net> | 2018-11-03 03:14:51 -0400 |
| commit | 1e02eb87763f1539b15bf92fe91cd67d00e64e44 (patch) | |
| tree | 73daedc1016283989a191412936b922ca22d350b /examples/dhtd.hs | |
| parent | 6b264121bee3b5c08af388f20c5273ef8956bc5e (diff) | |
build fix
Diffstat (limited to 'examples/dhtd.hs')
| -rw-r--r-- | examples/dhtd.hs | 2 |
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 | |||
| 1686 | return c | 1686 | return c |
| 1687 | Just c -> return c | 1687 | Just c -> return c |
| 1688 | 1688 | ||
| 1689 | addDestroySessionHook netcrypto (Just 0) $ delSession c . fromIntegral . ncSessionId | 1689 | atomically $ Tox.addDestroySessionHook netcrypto (Just 0) $ void . delSession c . fromIntegral . Tox.ncSessionId |
| 1690 | addSession c netcrypto | 1690 | addSession c netcrypto |
| 1691 | 1691 | ||
| 1692 | return () | 1692 | return () |