summaryrefslogtreecommitdiff
path: root/src/Network/BitTorrent/DHT/Query.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network/BitTorrent/DHT/Query.hs')
-rw-r--r--src/Network/BitTorrent/DHT/Query.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Network/BitTorrent/DHT/Query.hs b/src/Network/BitTorrent/DHT/Query.hs
index 714e9559..b9f12649 100644
--- a/src/Network/BitTorrent/DHT/Query.hs
+++ b/src/Network/BitTorrent/DHT/Query.hs
@@ -6,7 +6,7 @@ module Network.BitTorrent.DHT.Query
6 , findNodeH 6 , findNodeH
7 , getPeersH 7 , getPeersH
8 , announceH 8 , announceH
9 , handlers 9 , defaultHandlers
10 10
11 -- * Search 11 -- * Search
12 -- ** Step 12 -- ** Step
@@ -81,8 +81,8 @@ announceH = nodeHandler $ \ naddr @ NodeAddr {..} (Announce {..}) -> do
81 return Announced 81 return Announced
82 82
83-- | Includes all query handlers. 83-- | Includes all query handlers.
84handlers :: Address ip => [NodeHandler ip] 84defaultHandlers :: Address ip => [NodeHandler ip]
85handlers = [pingH, findNodeH, getPeersH, announceH] 85defaultHandlers = [pingH, findNodeH, getPeersH, announceH]
86 86
87{----------------------------------------------------------------------- 87{-----------------------------------------------------------------------
88-- Search 88-- Search