re-enabled GUI

This commit is contained in:
Nicole Dresselhaus 2014-08-24 22:59:35 +02:00
parent b4710797fc
commit c21863c03a
No known key found for this signature in database
GPG Key ID: BC16D887851A1A80

View File

@ -458,9 +458,9 @@ render = do
---- RENDER MAP IN TEXTURE <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
-- COLORMAP
liftIO $ do
bindFramebuffer Framebuffer $= defaultFramebufferObject
drawBuffer $= BackBuffers
{-tex <- liftIO $ readTVarIO (state ^. mapTexture)
{-bindFramebuffer Framebuffer $= defaultFramebufferObject
drawBuffer $= BackBuffers-}
tex <- liftIO $ readTVarIO (state ^. mapTexture)
textureBinding Texture2D $= Just tex
framebufferTexture2D
Framebuffer
@ -470,7 +470,7 @@ render = do
0
-- Render to FrameBufferObject
drawBuffers $= [FBOColorAttachment 0]-}
drawBuffers $= [FBOColorAttachment 0]
checkError "setup Render-Target"
clear [ColorBuffer, DepthBuffer]
@ -502,7 +502,7 @@ render = do
---- COMPOSE RENDERING --------------------------------------------
-- Render to BackBuffer (=Screen)
{-bindFramebuffer Framebuffer $= defaultFramebufferObject
bindFramebuffer Framebuffer $= defaultFramebufferObject
drawBuffer $= BackBuffers
-- Drawing HUD
clear [ColorBuffer, DepthBuffer]
@ -531,6 +531,6 @@ render = do
drawElements TriangleStrip 4 UnsignedInt offset0
bindBuffer ArrayBuffer $= Nothing
bindBuffer ElementArrayBuffer $= Nothing-}
bindBuffer ElementArrayBuffer $= Nothing