diff --git a/hbs2-peer/app/PeerMain.hs b/hbs2-peer/app/PeerMain.hs
index fdfb1e7d..15ee4bca 100644
--- a/hbs2-peer/app/PeerMain.hs
+++ b/hbs2-peer/app/PeerMain.hs
@@ -120,7 +120,7 @@ instance Exception GoAgainException
 
 -- TODO: write-workers-to-config
 defStorageThreads :: Integral a => a
-defStorageThreads = 2
+defStorageThreads = 4
 
 defLocalMulticast :: String
 defLocalMulticast = "239.192.152.145:10153"