summaryrefslogtreecommitdiff
path: root/src/Network
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network')
-rw-r--r--src/Network/BitTorrent/DHT/Session.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Network/BitTorrent/DHT/Session.hs b/src/Network/BitTorrent/DHT/Session.hs
index 0c806db2..9aa25866 100644
--- a/src/Network/BitTorrent/DHT/Session.hs
+++ b/src/Network/BitTorrent/DHT/Session.hs
@@ -275,7 +275,7 @@ instance MonadActive (DHT ip) where
275 monadActive = getManager >>= liftIO . isActive 275 monadActive = getManager >>= liftIO . isActive
276 {-# INLINE monadActive #-} 276 {-# INLINE monadActive #-}
277 277
278-- | All allocated resources will be closed at 'stopNode'. 278-- | All allocated resources will be closed at 'closeNode'.
279instance MonadResource (DHT ip) where 279instance MonadResource (DHT ip) where
280 liftResourceT m = do 280 liftResourceT m = do
281 s <- asks resources 281 s <- asks resources
@@ -292,7 +292,7 @@ instance MonadLogger (DHT ip) where
292type NodeHandler ip = Handler (DHT ip) 292type NodeHandler ip = Handler (DHT ip)
293 293
294-- | Run DHT session. You /must/ properly close session using 294-- | Run DHT session. You /must/ properly close session using
295-- 'stopNode' function, otherwise socket or other scarce resources may 295-- 'closeNode' function, otherwise socket or other scarce resources may
296-- leak. 296-- leak.
297newNode :: Address ip 297newNode :: Address ip
298 => [NodeHandler ip] -- ^ handlers to run on accepted queries; 298 => [NodeHandler ip] -- ^ handlers to run on accepted queries;