1 files changed, 0 insertions, 12 deletions

diff --git a/src/Network/BitTorrent/Tracker/Session.hs b/src/Network/BitTorrent/Tracker/Session.hs
index 5aa9c0eb..560acf84 100644
--- a/src/Network/BitTorrent/Tracker/Session.hs
+++ b/src/Network/BitTorrent/Tracker/Session.hs
@@ -47,8 +47,6 @@ import Control.Exception
 import Control.Concurrent
 import Control.Concurrent.Chan.Split as CS
 import Control.Monad
-import Data.Aeson
-import Data.Aeson.TH
 import Data.Default
 import Data.Fixed
 import Data.Foldable as F
@@ -60,7 +58,6 @@ import Data.Traversable
 import Network.URI
 
 import Data.Torrent.InfoHash
-import Data.Torrent.JSON
 import Network.BitTorrent.Core
 import Network.BitTorrent.Internal.Cache
 import Network.BitTorrent.Internal.Types
@@ -95,8 +92,6 @@ data LastScrape = LastScrape
   , scrapeSeeders  :: Maybe Int
   } deriving (Show, Eq)
 
-$(deriveJSON omitRecordPrefix ''LastScrape)
-
 -- | Single tracker session.
 data TrackerSession = TrackerSession
   { -- | Used to notify 'Stopped' and 'Completed' events.
@@ -109,13 +104,6 @@ data TrackerSession = TrackerSession
   , trackerScrape :: Cached LastScrape
   }
 
-instance ToJSON (TierEntry TrackerSession) where
-  toJSON (uri, TrackerSession {..}) = object
-    [ "uri"    .= uri
-    , "peers"  .= trackerPeers
-    , "scrape" .= trackerScrape
-    ]
-
 -- | Not contacted.
 instance Default TrackerSession where
   def = TrackerSession Nothing def def