From 87c20d81619b09b2e3c5d6f00b7b2cad900a67fe Mon Sep 17 00:00:00 2001 From: Sam T Date: Sun, 21 Jul 2013 13:29:37 +0400 Subject: ~ Move some extensions to cabal. --- src/Network/BitTorrent/DHT/Protocol.hs | 2 -- src/Network/BitTorrent/Exchange.hs | 2 -- src/Network/BitTorrent/Exchange/Protocol.hs | 2 -- src/Network/BitTorrent/Extension.hs | 1 - src/Network/BitTorrent/Peer.hs | 2 -- src/Network/BitTorrent/Sessions.hs | 2 -- src/Network/BitTorrent/Tracker.hs | 2 -- src/Network/BitTorrent/Tracker/HTTP.hs | 1 - src/Network/BitTorrent/Tracker/Protocol.hs | 6 ++---- 9 files changed, 2 insertions(+), 18 deletions(-) (limited to 'src/Network/BitTorrent') diff --git a/src/Network/BitTorrent/DHT/Protocol.hs b/src/Network/BitTorrent/DHT/Protocol.hs index 5cc1722d..b0100b70 100644 --- a/src/Network/BitTorrent/DHT/Protocol.hs +++ b/src/Network/BitTorrent/DHT/Protocol.hs @@ -1,5 +1,3 @@ -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} module Network.BitTorrent.DHT.Protocol ( newNodeSession diff --git a/src/Network/BitTorrent/Exchange.hs b/src/Network/BitTorrent/Exchange.hs index 71be3f88..dc41b08e 100644 --- a/src/Network/BitTorrent/Exchange.hs +++ b/src/Network/BitTorrent/Exchange.hs @@ -39,10 +39,8 @@ -- -- Finally we get a simple event-based communication model. -- -{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE MultiParamTypeClasses #-} -{-# LANGUAGE RecordWildCards #-} {-# LANGUAGE BangPatterns #-} module Network.BitTorrent.Exchange ( P2P diff --git a/src/Network/BitTorrent/Exchange/Protocol.hs b/src/Network/BitTorrent/Exchange/Protocol.hs index 573a6e5c..8461745a 100644 --- a/src/Network/BitTorrent/Exchange/Protocol.hs +++ b/src/Network/BitTorrent/Exchange/Protocol.hs @@ -25,8 +25,6 @@ -- For more infomation see: -- -- -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} {-# LANGUAGE TemplateHaskell #-} {-# OPTIONS -fno-warn-orphans #-} module Network.BitTorrent.Exchange.Protocol diff --git a/src/Network/BitTorrent/Extension.hs b/src/Network/BitTorrent/Extension.hs index a498bc19..c0eb058f 100644 --- a/src/Network/BitTorrent/Extension.hs +++ b/src/Network/BitTorrent/Extension.hs @@ -10,7 +10,6 @@ -- See for more -- information. -- -{-# LANGUAGE OverloadedStrings #-} module Network.BitTorrent.Extension ( -- * Capabilities Capabilities diff --git a/src/Network/BitTorrent/Peer.hs b/src/Network/BitTorrent/Peer.hs index 27f9ac10..a4d026dc 100644 --- a/src/Network/BitTorrent/Peer.hs +++ b/src/Network/BitTorrent/Peer.hs @@ -28,8 +28,6 @@ -- capabilities (such as supported enchancements), this should be -- done using 'Network.BitTorrent.Extension'! -- -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE TemplateHaskell #-} diff --git a/src/Network/BitTorrent/Sessions.hs b/src/Network/BitTorrent/Sessions.hs index 6b73dd6c..8bfa64d1 100644 --- a/src/Network/BitTorrent/Sessions.hs +++ b/src/Network/BitTorrent/Sessions.hs @@ -5,8 +5,6 @@ -- Stability : experimental -- Portability : portable -- -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} module Network.BitTorrent.Sessions ( -- * Progress Progress(..), startProgress diff --git a/src/Network/BitTorrent/Tracker.hs b/src/Network/BitTorrent/Tracker.hs index be5c2fb8..e1e6ea71 100644 --- a/src/Network/BitTorrent/Tracker.hs +++ b/src/Network/BitTorrent/Tracker.hs @@ -9,8 +9,6 @@ -- communication. Tracker is used to discover other peers in the -- network using torrent info hash. -- -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} {-# LANGUAGE TemplateHaskell #-} module Network.BitTorrent.Tracker ( withTracker, completedReq 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 @@ -- For more information see: -- -- -{-# LANGUAGE OverloadedStrings #-} module Network.BitTorrent.Tracker.HTTP ( askTracker, leaveTracker , 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 @@ -- scrape query -- which queries the state of a given torrent (or -- a list of torrents) that the tracker is managing. -- -{-# OPTIONS -fno-warn-orphans #-} -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} -{-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE TemplateHaskell #-} +{-# OPTIONS -fno-warn-orphans #-} module Network.BitTorrent.Tracker.Protocol ( Event(..), AnnounceQuery(..), AnnounceInfo(..) , defaultNumWant , defaultPorts -- cgit v1.2.3