diff --git a/flake.nix b/flake.nix
index 619deb98..bb194719 100644
--- a/flake.nix
+++ b/flake.nix
@@ -33,8 +33,8 @@ outputs = { self, nixpkgs, haskell-flake-utils, ... }@inputs:
 
 
    packagePostOverrides = { pkgs }: with pkgs; with haskell.lib; [
-    disableExecutableProfiling
-    disableLibraryProfiling
+    enableExecutableProfiling
+    enableLibraryProfiling
     dontBenchmark
     dontCoverage
     dontDistribute
diff --git a/hbs2-core/lib/HBS2/Actors/Peer.hs b/hbs2-core/lib/HBS2/Actors/Peer.hs
index 00d9dd96..2eb2e9db 100644
--- a/hbs2-core/lib/HBS2/Actors/Peer.hs
+++ b/hbs2-core/lib/HBS2/Actors/Peer.hs
@@ -301,7 +301,7 @@ runPeerM s bus p f  = do
                             <*> liftIO (newTVarIO mempty)
 
   let de = view envDeferred env
-  as <- liftIO $ replicateM 2 $ asyncBound $ runPipeline de
+  as <- liftIO $ replicateM 4 $ async $ runPipeline de
 
   sw <- liftIO $ async $ forever $ withPeerM env $ do
           pause defSweepTimeout
diff --git a/hbs2-tests/test/Peer2Main.hs b/hbs2-tests/test/Peer2Main.hs
index a47a400e..5ada7a53 100644
--- a/hbs2-tests/test/Peer2Main.hs
+++ b/hbs2-tests/test/Peer2Main.hs
@@ -592,11 +592,10 @@ main = do
 
                 bytes <- replicateM size $ uniformM g :: IO [Char]
 
-                -- let blk = B8.pack bytes
+                let blk = B8.pack bytes
 
-                -- root <- putAsMerkle s blk
+                root <- putAsMerkle s blk
 
-                let root = "Efq9DZs2vyY3X4XB7sZUi1AxDuujamLjnJAGzc6odh9z"
                 rootSz <- hasBlock s (fromMerkleHash root)
 
                 debug $ "I'm" <+> pretty p <+> pretty root