summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Backend/GL/Backend.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Backend/GL/Backend.hs b/Backend/GL/Backend.hs
index decf93c..eed33eb 100644
--- a/Backend/GL/Backend.hs
+++ b/Backend/GL/Backend.hs
@@ -578,7 +578,7 @@ renderPipeline glp = do
578 GLSetAccumulationContext aCtx -> setupAccumulationContext aCtx 578 GLSetAccumulationContext aCtx -> setupAccumulationContext aCtx
579 GLSetRenderTarget rt bufs -> do 579 GLSetRenderTarget rt bufs -> do
580 -- set target viewport 580 -- set target viewport
581 when (rt == 0) $ do -- screen out 581 --when (rt == 0) $ do -- screen out
582 ic' <- readIORef $ glInput glp 582 ic' <- readIORef $ glInput glp
583 case ic' of 583 case ic' of
584 Nothing -> return () 584 Nothing -> return ()