diff --git a/hbs2-tests/test/TestChunkWriter.hs b/hbs2-tests/test/TestChunkWriter.hs
index c1fe9220..a0322351 100644
--- a/hbs2-tests/test/TestChunkWriter.hs
+++ b/hbs2-tests/test/TestChunkWriter.hs
@@ -67,8 +67,7 @@ main = do
 
           let psz = calcChunks (fromIntegral size) (fromIntegral chu)
 
-          psz' <- pure psz
-          -- psz' <- shuffleM psz
+          psz' <- shuffleM psz
 
           forM_ psz' $ \(o,s) -> do
             let t = B8.take s $ B8.drop o bytes