diff --git a/distributed-process-async.cabal b/distributed-process-async.cabal
--- a/distributed-process-async.cabal
+++ b/distributed-process-async.cabal
@@ -1,5 +1,5 @@
 name:           distributed-process-async
-version:        0.2.4
+version:        0.2.4.1
 cabal-version:  >=1.8
 build-type:     Simple
 license:        BSD3
@@ -31,8 +31,7 @@
   build-depends:
                    base >= 4.4 && < 5,
                    data-accessor >= 0.2.2.3,
-                   distributed-process >= 0.6.1 && < 0.7,
-                   distributed-process-extras >= 0.3.0 && < 0.4,
+                   distributed-process >= 0.6.1 && < 0.8,
                    exceptions >= 0.8.2.1 && < 0.9,
                    binary >= 0.6.3.0 && < 0.9,
                    deepseq >= 1.3.0.1 && < 1.5,
@@ -59,14 +58,11 @@
   build-depends:
                    base >= 4.4 && < 5,
                    ansi-terminal >= 0.5 && < 0.7,
-                   distributed-process >= 0.6.1 && < 0.7,
-                   distributed-process-extras >= 0.3.0 && < 0.4,
                    distributed-process-async,
-                   distributed-process-systest >= 0.1.0 && < 0.2.0,
                    exceptions >= 0.8.2.1 && < 0.9,
                    network >= 2.5 && < 2.7,
-                   network-transport >= 0.4 && < 0.5,
-                   network-transport-tcp >= 0.4 && < 0.6,
+                   network-transport >= 0.4 && < 0.6,
+                   network-transport-tcp >= 0.4 && < 0.7,
                    binary >= 0.6.3.0 && < 0.9,
                    deepseq >= 1.3.0.1 && < 1.5,
                    HUnit >= 1.2 && < 2,
diff --git a/tests/TestAsync.hs b/tests/TestAsync.hs
--- a/tests/TestAsync.hs
+++ b/tests/TestAsync.hs
@@ -228,8 +228,7 @@
 -- | Given a @builder@ function, make and run a test suite on a single transport
 testMain :: (NT.Transport -> IO [Test]) -> IO ()
 testMain builder = do
-  Right (transport, _) <- createTransportExposeInternals
-                                     "127.0.0.1" "0" defaultTCPParameters
+  Right (transport, _) <- createTransportExposeInternals"127.0.0.1" "0" (\sn -> ("127.0.0.1", sn)) defaultTCPParameters
   testData <- builder transport
   defaultMain testData
 
