summaryrefslogtreecommitdiff
path: root/src/Network/BitTorrent/Tracker.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network/BitTorrent/Tracker.hs')
-rw-r--r--src/Network/BitTorrent/Tracker.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Network/BitTorrent/Tracker.hs b/src/Network/BitTorrent/Tracker.hs
index 275b5422..cb776431 100644
--- a/src/Network/BitTorrent/Tracker.hs
+++ b/src/Network/BitTorrent/Tracker.hs
@@ -94,8 +94,8 @@ genericReq ses pr = TRequest {
94 } 94 }
95 95
96 96
97-- | The first request to the tracker that should be created is 'startedReq'. 97-- | The first request to the tracker that should be created is
98-- It includes necessary 'Started' event field. 98-- 'startedReq'. It includes necessary 'Started' event field.
99-- 99--
100startedReq :: TConnection -> Progress -> TRequest 100startedReq :: TConnection -> Progress -> TRequest
101startedReq ses pr = (genericReq ses pr) { 101startedReq ses pr = (genericReq ses pr) {