diff --git a/src/Dodge/Update/Camera.hs b/src/Dodge/Update/Camera.hs index 55b92fe64..32632ef85 100644 --- a/src/Dodge/Update/Camera.hs +++ b/src/Dodge/Update/Camera.hs @@ -139,6 +139,7 @@ rotateCamera :: Configuration -> World -> World rotateCamera cfig w | Just ltime <- pkeys ^? ix SDL.ButtonLeft , Just rtime <- pkeys ^? ix SDL.ButtonRight + , rtime > 0 , ltime > rtime = w & wCam . camRot -~ rotation | otherwise = ifConfigWallRotate cfig (w ^. input . mouseButtons) w