Clicking on button in inventory list activates button

src/Dodge/Update.hs

@@ -41,7 +41,6 @@ import Dodge.Projectile.Update
 import Dodge.Prop.Moving
 import Dodge.RadarBlip
 import Dodge.RadarSweep
-import Dodge.ScreenPos
 import Dodge.ScrollValue
 import Dodge.SelectionSections
 import Dodge.Shockwave.Update
@@ -403,13 +402,6 @@ isOverTerminalScreen :: Config -> Point2 -> Bool
 isOverTerminalScreen cfig (V2 x y) = fromMaybe False $ do
     (V2 xmin ymax, V2 xmax ymin) <- ldpRect cfig terminalLDP
     return $ x <= xmax && x >= xmin && y <= ymax && y >= ymin
-  where
---    ldp = terminalLDP
---    V2 xmin ymax = screenPosAbs cfig (ldp ^. ldpPos)
---    tsize = fromIntegral $ getMaxLinesTM + 1
---    s = 5 + tsize * (20 * ldp ^. ldpScale + ldp ^. ldpVerticalGap)
---    ymin = ymax - s
---    xmax = xmin + 555 -- HACK drawSelectionListBackground
 
 updateWheelEvents :: World -> World
 updateWheelEvents w = case w ^. input . scrollAmount of