summaryrefslogtreecommitdiff
path: root/Presence/PeerResolve.hs
diff options
context:
space:
mode:
authorjoe <joe@jerkface.net>2018-06-22 21:17:22 -0400
committerjoe <joe@jerkface.net>2018-06-22 21:17:22 -0400
commitf5f854c8144dc29086928a94b2ea86cfae0d0557 (patch)
tree5a7daccc1be66375edd35b238f348129f540b146 /Presence/PeerResolve.hs
parent6f040764654640730d3f832cf4e41174562718fb (diff)
Removed redundant imports and other clean up.
Diffstat (limited to 'Presence/PeerResolve.hs')
-rw-r--r--Presence/PeerResolve.hs12
1 files changed, 0 insertions, 12 deletions
diff --git a/Presence/PeerResolve.hs b/Presence/PeerResolve.hs
index 0854b365..900688c3 100644
--- a/Presence/PeerResolve.hs
+++ b/Presence/PeerResolve.hs
@@ -6,24 +6,12 @@ module PeerResolve
6 , withPort 6 , withPort
7 ) where 7 ) where
8 8
9import Data.List ( nub )
10import Data.Text ( Text ) 9import Data.Text ( Text )
11import Network.Socket ( SockAddr(..) ) 10import Network.Socket ( SockAddr(..) )
12import System.Endian ( fromBE32, toBE32 )
13import System.IO.Error ( isDoesNotExistError )
14import Control.Exception ( handle, ErrorCall(..) )
15import qualified Network.BSD as BSD
16import qualified Data.Text as Text
17import Control.Concurrent
18import Control.Concurrent.STM
19import Control.Monad
20import Data.Maybe
21import System.IO.Unsafe 11import System.IO.Unsafe
22 12
23import GetHostByAddr
24import DNSCache 13import DNSCache
25import ConnectionKey 14import ConnectionKey
26import ControlMaybe
27 15
28{-# NOINLINE global_dns_cache #-} 16{-# NOINLINE global_dns_cache #-}
29global_dns_cache :: DNSCache 17global_dns_cache :: DNSCache