diff --git a/src/CommandBuffer.hs b/src/CommandBuffer.hs
index 868a3b5..70971e0 100644
--- a/src/CommandBuffer.hs
+++ b/src/CommandBuffer.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE DuplicateRecordFields #-}
 {-# LANGUAGE DataKinds #-}
 {-# LANGUAGE FlexibleContexts #-}
@@ -320,50 +319,6 @@ recordCommandBuffer
             )
           draws
 
-        -- V.mapM_
-        --   (\(IndirectBatch mesh material first count) -> do
-
-        --     when
-        --       (materialTextureSet material /= Vk.NULL_HANDLE)
-        --       (Vk.cmdBindDescriptorSets
-        --         commandBuffer
-        --         Vk.PIPELINE_BIND_POINT_GRAPHICS
-        --         (materialPipelineLayout material)
-        --         2
-        --         (V.singleton $ materialTextureSet material)
-        --         V.empty
-        --         )
-
-        --     Vk.cmdBindPipeline commandBuffer Vk.PIPELINE_BIND_POINT_GRAPHICS (materialPipeline material)
-
-        --     Vk.cmdBindDescriptorSets
-        --       commandBuffer
-        --       Vk.PIPELINE_BIND_POINT_GRAPHICS
-        --       (materialPipelineLayout material)
-        --       0
-        --       (V.singleton $ frameGlobalDescriptor frame)
-        --       V.empty
-
-        --     Vk.cmdBindDescriptorSets
-        --       commandBuffer
-        --       Vk.PIPELINE_BIND_POINT_GRAPHICS
-        --       (materialPipelineLayout material)
-        --       1
-        --       (V.singleton $ frameObjectDescriptor frame)
-        --       V.empty
-
-        --     Vk.cmdBindVertexBuffers
-        --       commandBuffer
-        --       0
-        --       (V.fromList [ allocatedBuffer $ meshBuffer mesh ])
-        --       (V.fromList [ 0 ])
-
-        --     mapM_
-        --       (Vk.cmdDraw commandBuffer (fromIntegral $ V.length $ meshVertices mesh) 1 0)
-        --       [first .. (count - 1)]
-        --     )
-        --   draws
-
 prepareRecording
   :: V2 CInt
   -> Vk.CommandBuffer