From d5b7821ec75a78ff477690e96347c61eb72d5a74 Mon Sep 17 00:00:00 2001
From: tali <iitalics@gmail.com>
Date: Fri, 19 Jan 2024 14:13:29 -0500
Subject: [PATCH] dont show window before event loop starts

---
 src/s2/window.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/s2/window.ml b/src/s2/window.ml
index 569bd5f..3c9d284 100644
--- a/src/s2/window.ml
+++ b/src/s2/window.ml
@@ -6,7 +6,7 @@ exception Quit
 type t = Sdl.window
 
 let make ~title =
-  let flags = Sdl.Window.(opengl + resizable - shown) in
+  let flags = Sdl.Window.(opengl + resizable + hidden) in
   let window =
     Sdl.create_window_exn
       ~w:1024 ~h:800