Tweak pause camera movement

2023-04-25 10:23:43 +01:00
parent a2ad7c23ff
commit 734d74af52
31 changed files with 97 additions and 114 deletions
@@ -228,11 +228,9 @@ doDrawing' win pdata u = do
    glBindTextureUnit 0 (pdata ^. fboBloom . _2 . unTO)
    glDisable GL_BLEND
    drawShader (_bloomBlurShader pdata) 4
-    if cfig ^. graphics_bloom 
-    then do   
+    when (cfig ^. graphics_bloom) $ do   
        replicateM_ 2 $ pingPongBetween (_fboHalf1 pdata) (_fboHalf2 pdata) (_bloomBlurShader pdata)
        glEnable GL_BLEND
-    else return ()
    setViewport _graphics_world_resolution cfig
    --draw clouds onto cloud buffer
    glBindFramebuffer GL_FRAMEBUFFER (_unFBO (fst (_fboCloud pdata)))