Removed redundant imports and other clean up.

1 files changed, 2 insertions, 14 deletions

diff --git a/src/Network/Kademlia/Bootstrap.hs b/src/Network/Kademlia/Bootstrap.hs
index 4197e06e..1a70a9c5 100644
--- a/src/Network/Kademlia/Bootstrap.hs
+++ b/src/Network/Kademlia/Bootstrap.hs
@@ -16,8 +16,7 @@ module Network.Kademlia.Bootstrap where
 import Data.Function
 import Data.Maybe
 import qualified Data.Set as Set
-import Data.Time.Clock       (getCurrentTime)
-import Data.Time.Clock.POSIX (getPOSIXTime, utcTimeToPOSIXSeconds)
+import Data.Time.Clock.POSIX (getPOSIXTime)
 import Network.Kademlia.Routing   as R
 #ifdef THREAD_DEBUG
 import Control.Concurrent.Lifted.Instrument
@@ -27,27 +26,16 @@ import GHC.Conc                  (labelThread)
 #endif
 import Control.Concurrent.STM
 import Control.Monad
-import Data.Bits
 import Data.Hashable
-#if MIN_VERSION_iproute(1,7,4)
-import Data.IP hiding (fromSockAddr)
-#else
-import Data.IP
-#endif
-import Data.Monoid
-import Data.Serialize                 (Serialize)
 import Data.Time.Clock.POSIX          (POSIXTime)
 import Data.Ord
 import System.Entropy
 import System.Timeout
-import Text.PrettyPrint               as PP hiding (($$), (<>))
-import Text.PrettyPrint.HughesPJClass hiding (($$), (<>))
-import System.IO
 import DPut
 
 import qualified Data.Wrapper.PSQInt  as Int
          ;import Data.Wrapper.PSQInt  (pattern (:->))
-import Network.Address                (bucketRange,genBucketSample)
+import Network.Address                (bucketRange)
 import Network.Kademlia.Search
 import Control.Concurrent.Tasks
 import Network.Kademlia