started creating a GUI overlay image

2014-03-05 13:27:48 +01:00
parent 734cabb759
commit be0da410a0
3 changed files with 25 additions and 2 deletions
--- a/src/Main.hs
+++ b/src/Main.hs
@ -40,6 +40,7 @@ import           Render.Misc                          (checkError,
 import           Render.Render                        (initRendering,
                                                       initShader)
 import           UI.Callbacks
+import           UI.GUIOverlay
 import           Types

 import qualified Debug.Trace                          as D (trace)
@ -53,7 +54,7 @@ main = do
                                                                             ,WindowResizable  -- and resizable 
                                                                             ,WindowInputFocus -- focused (=> active)
                                                                             ,WindowMouseFocus -- Mouse into it
-                                                                             ,WindowInputGrabbed-- never let go of input (KB/Mouse)
+                                                                             --,WindowInputGrabbed-- never let go of input (KB/Mouse)
                                                                             ] $ \window -> do
        withOpenGL window $ do
        (Size fbWidth fbHeight) <- glGetDrawableSize window