Cleanup

2024-11-25 23:13:54 +00:00
parent 6aea049b80
commit f91a5cebb5
5 changed files with 98 additions and 218 deletions
@@ -206,7 +206,7 @@ rotateCamera cfig w
    | keydown SDL.ScancodeE = rotateCameraBy (-0.025) w
    | otherwise = ifConfigWallRotate cfig (w ^. input . mouseButtons) w
  where
-    keydown scode = scode `M.member` _pressedKeys (_input w) && not (inInputFocus w)
+    keydown scode = scode `M.member` _pressedKeys (_input w) && not (inTextInputFocus w)

 zoomFromItem :: ItZoom -> Float
 zoomFromItem ItZoom{_izMax = zMax, _izMin = zMin, _izFac = zFac} =