diff options
author | Sam T <pxqr.sta@gmail.com> | 2013-06-12 06:34:19 +0400 |
---|---|---|
committer | Sam T <pxqr.sta@gmail.com> | 2013-06-12 06:34:19 +0400 |
commit | 8b005c4eb0f58db974c342efe0821240f39a6331 (patch) | |
tree | 85a32db63949ed1082a61100b71fcb830e1044e5 /src/Network/BitTorrent/Tracker.hs | |
parent | 7f27eec9bf34a513f7a28072468706e8975ef552 (diff) |
+ Rename to await and yield.
Diffstat (limited to 'src/Network/BitTorrent/Tracker.hs')
-rw-r--r-- | src/Network/BitTorrent/Tracker.hs | 4 |
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 | -- |
100 | startedReq :: TConnection -> Progress -> TRequest | 100 | startedReq :: TConnection -> Progress -> TRequest |
101 | startedReq ses pr = (genericReq ses pr) { | 101 | startedReq ses pr = (genericReq ses pr) { |