diff options
| author | Akshay Nair <phenax5@gmail.com> | 2024-12-14 18:28:19 +0530 |
|---|---|---|
| committer | Akshay Nair <phenax5@gmail.com> | 2024-12-14 18:28:19 +0530 |
| commit | f48587bda4dea13920a96dda06b735be484614a9 (patch) | |
| tree | cbaf079ca8f1c02800cf2984a89e48d2690b3050 /src/Chelleport/Context.hs | |
| parent | ef178e85975ea2bdbd2043c92f0917e0fe19823a (diff) | |
| download | chelleport-f48587bda4dea13920a96dda06b735be484614a9.tar.gz chelleport-f48587bda4dea13920a96dda06b735be484614a9.zip | |
Add left click on space + minor fixes
Diffstat (limited to 'src/Chelleport/Context.hs')
| -rw-r--r-- | src/Chelleport/Context.hs | 5 |
1 files changed, 2 insertions, 3 deletions
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 |