diff options
| author | Joe Crayne <joe@jerkface.net> | 2018-09-07 12:10:57 -0400 |
|---|---|---|
| committer | Joe Crayne <joe@jerkface.net> | 2018-09-07 13:18:56 -0400 |
| commit | b3b228adf6fd71c089f4d3525b2bc3a6257f7f76 (patch) | |
| tree | a6da817110e93a39b17b35502fd71fab679ca7b5 /examples/dhtd.hs | |
| parent | b94122bfb91a37bb141fdff05573cc02fd93c942 (diff) | |
Removed unused arguments to setEstablished/setTerminated.
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 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) |