Implement generalised storing of position for mouse presses

This commit is contained in:
2023-03-26 23:00:07 +01:00
parent e5906eefa3
commit ee89ac9b00
10 changed files with 27 additions and 39 deletions
+1 -3
View File
@@ -13,8 +13,7 @@ import System.Random
defaultInput :: Input
defaultInput =
Input
{ _clickMousePos = V2 0 0
, _clickPos = mempty
{ _clickPos = mempty
, _heldPos = mempty
, _textInput = mempty
, _pressedKeys = mempty
@@ -22,7 +21,6 @@ defaultInput =
, _mousePos = V2 0 0
, _mouseMoving = False
, _scrollAmount = 0
, _previousScrollAmount = 0
, _smoothScrollAmount = 0
, _lrLine = (0, 0)
, _lLine = (0, 0)