Tweak pause camera movement

src/Shader/Compile.hs

@@ -46,7 +46,7 @@ makeShaderVBO ::
     IO (Shader, VBO)
 makeShaderVBO s shaderlist sizes pm = do
     prog <- makeSourcedShader s shaderlist
-    (vao, vbo) <- setupVBOVAO (sizes)
+    (vao, vbo) <- setupVBOVAO sizes
     return
         ( Shader
             { _shaderUINT = prog

src/Shader/Poke.hs

@@ -277,7 +277,7 @@ boxSurfaces size =
 
 memoBoxSurfaces :: V.Vector [[Int]]
 {-# INLINE memoBoxSurfaces #-}
-memoBoxSurfaces = V.generate 10 $ boxSurfaces
+memoBoxSurfaces = V.generate 10 boxSurfaces
 
 boxSurfacesIndices :: Int -> [[Int]]
 {-# INLINE boxSurfacesIndices #-}