Converted to SocketLike and quitListening interfaces.

Paving the way for conversion to conduits-based server over HaXml.

1 files changed, 1 insertions, 1 deletions

diff --git a/Presence/LocalPeerCred.hs b/Presence/LocalPeerCred.hs
index ee1a4a0f..d3b8d189 100644
--- a/Presence/LocalPeerCred.hs
+++ b/Presence/LocalPeerCred.hs
@@ -14,9 +14,9 @@ import System.IO ( withFile, IOMode(..))
 import Data.Maybe
 import Data.Binary
 import Data.Bits
-import Network.Socket
 import System.Posix.Types
 import Debug.Trace
+import SocketLike
 
 xs     ?? n | n < 0 =  Nothing
 []     ?? _         =  Nothing