diff options
author | Sam T <pxqr.sta@gmail.com> | 2013-07-21 13:29:37 +0400 |
---|---|---|
committer | Sam T <pxqr.sta@gmail.com> | 2013-07-21 13:29:37 +0400 |
commit | 87c20d81619b09b2e3c5d6f00b7b2cad900a67fe (patch) | |
tree | 120555bbaa2290ccd77ef3165aa43d0b3d20cd25 /src/Network/BitTorrent/Tracker | |
parent | 24803024ed05ded57a8cd18df610dfdb12813392 (diff) |
~ Move some extensions to cabal.
Diffstat (limited to 'src/Network/BitTorrent/Tracker')
-rw-r--r-- | src/Network/BitTorrent/Tracker/HTTP.hs | 1 | ||||
-rw-r--r-- | src/Network/BitTorrent/Tracker/Protocol.hs | 6 |
2 files changed, 2 insertions, 5 deletions
diff --git a/src/Network/BitTorrent/Tracker/HTTP.hs b/src/Network/BitTorrent/Tracker/HTTP.hs index fe690b96..0ada154b 100644 --- a/src/Network/BitTorrent/Tracker/HTTP.hs +++ b/src/Network/BitTorrent/Tracker/HTTP.hs | |||
@@ -13,7 +13,6 @@ | |||
13 | -- For more information see: | 13 | -- For more information see: |
14 | -- <https://wiki.theory.org/BitTorrentSpecification#Tracker_HTTP.2FHTTPS_Protocol> | 14 | -- <https://wiki.theory.org/BitTorrentSpecification#Tracker_HTTP.2FHTTPS_Protocol> |
15 | -- | 15 | -- |
16 | {-# LANGUAGE OverloadedStrings #-} | ||
17 | module Network.BitTorrent.Tracker.HTTP | 16 | module Network.BitTorrent.Tracker.HTTP |
18 | ( askTracker, leaveTracker | 17 | ( askTracker, leaveTracker |
19 | , scrapeURL | 18 | , scrapeURL |
diff --git a/src/Network/BitTorrent/Tracker/Protocol.hs b/src/Network/BitTorrent/Tracker/Protocol.hs index d1fff73c..ee395883 100644 --- a/src/Network/BitTorrent/Tracker/Protocol.hs +++ b/src/Network/BitTorrent/Tracker/Protocol.hs | |||
@@ -18,12 +18,10 @@ | |||
18 | -- scrape query -- which queries the state of a given torrent (or | 18 | -- scrape query -- which queries the state of a given torrent (or |
19 | -- a list of torrents) that the tracker is managing. | 19 | -- a list of torrents) that the tracker is managing. |
20 | -- | 20 | -- |
21 | {-# OPTIONS -fno-warn-orphans #-} | ||
22 | {-# LANGUAGE OverloadedStrings #-} | ||
23 | {-# LANGUAGE RecordWildCards #-} | ||
24 | {-# LANGUAGE GeneralizedNewtypeDeriving #-} | ||
25 | {-# LANGUAGE FlexibleInstances #-} | 21 | {-# LANGUAGE FlexibleInstances #-} |
22 | {-# LANGUAGE GeneralizedNewtypeDeriving #-} | ||
26 | {-# LANGUAGE TemplateHaskell #-} | 23 | {-# LANGUAGE TemplateHaskell #-} |
24 | {-# OPTIONS -fno-warn-orphans #-} | ||
27 | module Network.BitTorrent.Tracker.Protocol | 25 | module Network.BitTorrent.Tracker.Protocol |
28 | ( Event(..), AnnounceQuery(..), AnnounceInfo(..) | 26 | ( Event(..), AnnounceQuery(..), AnnounceInfo(..) |
29 | , defaultNumWant , defaultPorts | 27 | , defaultNumWant , defaultPorts |