summaryrefslogtreecommitdiff
path: root/src/LambdaCube/GL/Backend.hs
diff options
context:
space:
mode:
authorCsaba Hruska <csaba.hruska@gmail.com>2016-02-28 14:47:11 +0100
committerCsaba Hruska <csaba.hruska@gmail.com>2016-02-28 14:47:11 +0100
commit346b3a202aebedcad1b2515f52697e715efd23c7 (patch)
treefcecd255182a6eb9010f5baad0239026af1e913c /src/LambdaCube/GL/Backend.hs
parent58c2fbe70b78a2e8d9f5b4d8e79b7b39d0b9c1b6 (diff)
enable srgb by default
Diffstat (limited to 'src/LambdaCube/GL/Backend.hs')
-rw-r--r--src/LambdaCube/GL/Backend.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/LambdaCube/GL/Backend.hs b/src/LambdaCube/GL/Backend.hs
index 478dfd1..cec78a4 100644
--- a/src/LambdaCube/GL/Backend.hs
+++ b/src/LambdaCube/GL/Backend.hs
@@ -701,6 +701,7 @@ renderSlot cmds = forM_ cmds $ \cmd -> do
701 701
702renderFrame :: GLRenderer -> IO () 702renderFrame :: GLRenderer -> IO ()
703renderFrame glp = do 703renderFrame glp = do
704 glEnable GL_FRAMEBUFFER_SRGB
704 glBindVertexArray (glVAO glp) 705 glBindVertexArray (glVAO glp)
705 forM_ (glCommands glp) $ \cmd -> do 706 forM_ (glCommands glp) $ \cmd -> do
706 case cmd of 707 case cmd of