remove an unused type

[functorrent.git] / src / FuncTorrent / Peer.hs

diff --git a/src/FuncTorrent/Peer.hs b/src/FuncTorrent/Peer.hs
index 6131a6bb58750d6cf2548c9680b81b822ef5f5ab..b4ed1078cc479bd50c4444edeaee17a3a1e9126f 100644 (file)
--- a/src/FuncTorrent/Peer.hs
+++ b/src/FuncTorrent/Peer.hs
@@ -31,8 +31,6 @@ data PState = PState { handle :: Handle
                      , heChoking :: Bool
                      , heInterested :: Bool}
 
-type PeerState = State PState
-
 data PieceDlState = Pending
                   | Downloading
                   | Have