diff options
Diffstat (limited to 'Announcer.hs')
-rw-r--r-- | Announcer.hs | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/Announcer.hs b/Announcer.hs index 1b6cd631..e4b19bd7 100644 --- a/Announcer.hs +++ b/Announcer.hs | |||
@@ -27,10 +27,7 @@ module Announcer | |||
27 | , ScheduledItem(ScheduledItem) | 27 | , ScheduledItem(ScheduledItem) |
28 | ) where | 28 | ) where |
29 | 29 | ||
30 | import qualified Data.MinMaxPSQ as MM | ||
31 | import Data.Wrapper.PSQ as PSQ | 30 | import Data.Wrapper.PSQ as PSQ |
32 | import Network.Kademlia.Routing as R | ||
33 | import Network.Kademlia.Search | ||
34 | 31 | ||
35 | import Control.Concurrent.Lifted.Instrument | 32 | import Control.Concurrent.Lifted.Instrument |
36 | import Control.Concurrent.STM | 33 | import Control.Concurrent.STM |
@@ -38,14 +35,10 @@ import Control.Monad | |||
38 | import Control.Applicative | 35 | import Control.Applicative |
39 | import Data.ByteString (ByteString) | 36 | import Data.ByteString (ByteString) |
40 | import qualified Data.ByteString.Char8 as Char8 | 37 | import qualified Data.ByteString.Char8 as Char8 |
41 | import Data.Function | ||
42 | import Data.Hashable | 38 | import Data.Hashable |
43 | import Data.Maybe | ||
44 | import Data.Ord | ||
45 | import Data.Time.Clock.POSIX | 39 | import Data.Time.Clock.POSIX |
46 | import qualified GHC.Generics as Generics | 40 | import qualified GHC.Generics as Generics |
47 | -- import Generic.Data.Internal.Meta as Lyxia | 41 | -- import Generic.Data.Internal.Meta as Lyxia |
48 | import System.IO | ||
49 | 42 | ||
50 | newtype AnnounceKey = AnnounceKey ByteString | 43 | newtype AnnounceKey = AnnounceKey ByteString |
51 | deriving (Hashable,Ord,Eq) | 44 | deriving (Hashable,Ord,Eq) |