summaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorJoe Crayne <joe@jerkface.net>2018-09-07 12:10:57 -0400
committerJoe Crayne <joe@jerkface.net>2018-09-07 13:18:56 -0400
commitb3b228adf6fd71c089f4d3525b2bc3a6257f7f76 (patch)
treea6da817110e93a39b17b35502fd71fab679ca7b5 /examples
parentb94122bfb91a37bb141fdff05573cc02fd93c942 (diff)
Removed unused arguments to setEstablished/setTerminated.
Diffstat (limited to 'examples')
-rw-r--r--examples/dhtd.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/dhtd.hs b/examples/dhtd.hs
index 45a2a682..cdaa73ed 100644
--- a/examples/dhtd.hs
+++ b/examples/dhtd.hs
@@ -1989,7 +1989,7 @@ main = do
1989 now <- getPOSIXTime 1989 now <- getPOSIXTime
1990 forM_ (either (const Nothing) Just $ Tox.nodeInfo nid saddr) 1990 forM_ (either (const Nothing) Just $ Tox.nodeInfo nid saddr)
1991 $ \ni -> do 1991 $ \ni -> do
1992 atomically $ do setEstablished now them acnt 1992 atomically $ do setEstablished them acnt
1993 setContactAddr now them ni acnt 1993 setContactAddr now them ni acnt
1994 atomically $ do 1994 atomically $ do
1995 supply <- readTVar (Tox.listenerIDSupply netCryptoSessionsState) 1995 supply <- readTVar (Tox.listenerIDSupply netCryptoSessionsState)