diff --git a/src/Main.hs b/src/Main.hs
index 811f694..a52fe91 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -53,7 +53,6 @@ pre :: Affection UserData ()
 pre = do
   ad <- A.get
   ud <- getAffection
-  -- _ <- SDL.glSetAttribute SDL.SDL_GL_SHARE_WITH_CURRENT_CONTEXT 1
   threadCtx <- SDL.glCreateContext (drawWindow ad)
   SDL.glMakeCurrent (drawWindow ad) (glContext ad)
   let Subsystems w m k j = subsystems ud