Work towards unifying all in game input

2023-02-21 00:37:26 +00:00
parent 7b9b1d1799
commit dee7472d31
5 changed files with 127 additions and 37 deletions
@@ -194,7 +194,7 @@ rotateCamera cfig w
    | keydown SDL.ScancodeE = over cWorld (rotateCameraBy (-0.025)) w
    | otherwise = ifConfigWallRotate cfig w
  where
-    keydown scode = scode `M.member` _pressedKeys (_input w) && not (inputFocus w)
+    keydown scode = scode `M.member` _pressedKeys (_input w) && not (inInputFocus w)

 zoomFromItem ::
    ItZoom ->