From 9162e9f3b4f5da0f90641da5b7f84210ce7a9e92 Mon Sep 17 00:00:00 2001
From: tali <iitalics@gmail.com>
Date: Fri, 19 Jan 2024 19:01:31 -0500
Subject: [PATCH] remove redundant "window initialized" message

---
 src/s2/window.ml | 12 ++++--------
 1 file changed, 4 insertions(+), 8 deletions(-)

diff --git a/src/s2/window.ml b/src/s2/window.ml
index d05bb41..3f8be52 100644
--- a/src/s2/window.ml
+++ b/src/s2/window.ml
@@ -7,14 +7,10 @@ type t = Sdl.window
 
 let make ~title =
   let flags = Sdl.Window.(opengl + resizable + hidden) in
-  let window =
-    Sdl.create_window_exn
-      ~w:1024 ~h:800
-      title
-      flags
-  in
-  info (fun m -> m "window initialized");
-  window
+  Sdl.create_window_exn
+    ~w:1024 ~h:800
+    title
+    flags
 
 let event_loop window ~render =
   let event = Sdl.Event.create () in