From f48587bda4dea13920a96dda06b735be484614a9 Mon Sep 17 00:00:00 2001
From: Akshay Nair <phenax5@gmail.com>
Date: Sat, 14 Dec 2024 18:28:19 +0530
Subject: Add left click on space + minor fixes

---
 src/Chelleport/Context.hs | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'src/Chelleport/Context.hs')

diff --git a/src/Chelleport/Context.hs b/src/Chelleport/Context.hs
index 8ef41fd..1dd764f 100644
--- a/src/Chelleport/Context.hs
+++ b/src/Chelleport/Context.hs
@@ -22,13 +22,12 @@ createContext = do
 
   let windowCfg =
         SDL.defaultWindow
-          { SDL.windowInputGrabbed = True,
-            SDL.windowMode = SDL.FullscreenDesktop,
+          { SDL.windowMode = SDL.FullscreenDesktop,
             SDL.windowPosition = SDL.Absolute $ SDL.P $ SDL.V2 0 0,
             SDL.windowInitialSize = windowSize,
             SDL.windowBorder = False
           }
-  window <- SDL.createWindow "My SDL Application" windowCfg
+  window <- SDL.createWindow "Chelleport" windowCfg
   renderer <- SDL.createRenderer window (-1) SDL.defaultRenderer
   font <- TTF.load "Inter-Regular.ttf" 16
 
-- 
cgit v1.3.1