diff --git a/distributed-process-p2p.cabal b/distributed-process-p2p.cabal
--- a/distributed-process-p2p.cabal
+++ b/distributed-process-p2p.cabal
@@ -1,11 +1,13 @@
--- This file has been generated from package.yaml by hpack version 0.28.2.
+cabal-version: 1.12
+
+-- This file has been generated from package.yaml by hpack version 0.39.1.
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: a8fa97b703de94703e2085a4835441a1b3f28ab0a9b2bf8caeb881d7ad0c77a5
+-- hash: 955190b866f2b8f1354f797b07d8e6d430dac2b3b397817cda3cc1e45706fb2d
 
 name:                distributed-process-p2p
-version:             0.1.5.0
+version:             0.1.6.0
 synopsis:            Peer-to-peer node discovery for Cloud Haskell
 description:         Bootstraps a peer-to-peer connection network from a set of known hosts.
 homepage:            https://bitbucket.org/dpwiz/distributed-process-p2p/
@@ -16,7 +18,6 @@
 copyright:           Alexander Bondarenko
 category:            Network
 build-type:          Simple
-cabal-version:       >= 1.10
 extra-source-files:
   CHANGELOG
 
@@ -43,9 +44,9 @@
     binary >=0.5,
     bytestring >=0.9,
     containers >=0.4,
-    distributed-process >=0.5,
+    distributed-process >=0.7,
     mtl >=2.1,
-    network >=2.3,
+    network >=3,
     network-transport >=0.4,
     network-transport-tcp >=0.6
 
@@ -56,11 +57,11 @@
   ghc-options: -threaded
   build-depends:
     base ==4.*,
-    distributed-process >=0.5,
+    distributed-process >=0.7,
     distributed-process-p2p,
     mtl >=2.1
-  if flag(build-example)
-    buildable: True
   other-modules:
     Paths_distributed_process_p2p
   default-language: Haskell2010
+  if flag(build-example)
+    buildable: True
diff --git a/src/Control/Distributed/Backend/P2P.hs b/src/Control/Distributed/Backend/P2P.hs
--- a/src/Control/Distributed/Backend/P2P.hs
+++ b/src/Control/Distributed/Backend/P2P.hs
@@ -33,7 +33,7 @@
 import Control.Distributed.Process.Serializable (Serializable)
 import Network.Transport (EndPointAddress(..))
 import Network.Socket (HostName, ServiceName)
-import Network.Transport.TCP (createTransport, defaultTCPParameters)
+import Network.Transport.TCP (createTransport, defaultTCPParameters, TCPAddr(..), TCPAddrInfo(..))
 
 import Control.Applicative
 import Control.Concurrent (threadDelay)
@@ -111,7 +111,7 @@
   -> IO LocalNode
 createLocalNode host port mkExternal rTable = do
     transport <- either (error . show) id
-                 <$> createTransport host port mkExternal defaultTCPParameters
+                 <$> createTransport (Addressable $ TCPAddrInfo host port mkExternal) defaultTCPParameters
     newLocalNode transport rTable
 
 peerControllerService :: String