Commit before using central mouse context type

src/Dodge/Data/Input.hs

@@ -16,8 +16,15 @@ data PressType
     | LongPress
     deriving (Eq, Show)
 
+data MouseContext
+    = NoMouseContext
+    | OverInv (Int,Int)
+    | OverCombInv (Int,Int)
+    | OverTerminalScreen
+
 data Input = Input
     { _mousePos :: Point2 -- in pixels, from the center of the screen
+    , _mouseContext :: MouseContext
     , _mouseMoving :: Bool
     , _pressedKeys :: M.Map Scancode PressType
     , _mouseButtons :: M.Map MouseButton Int -- counts number of frames held down