Zone creatures (casues slowdown)

2022-07-01 19:05:46 +01:00
parent ca40f315c0
commit 9c7c5e1133
2 changed files with 4 additions and 7 deletions
@@ -33,7 +33,7 @@ updatePressedButtons subinv pkeys w = case subinv of
        | otherwise -> updatePressedButtons' pkeys w
    CombineInventory mi
        | pkeys ^? ix ButtonLeft == Just False
-                -> (maybeexitcombine $ maybe id doCombine mi w) & hammers . ix SubInvHam .~ HammerDown
+                -> maybeexitcombine (maybe id doCombine mi w) & hammers . ix SubInvHam .~ HammerDown
    DisplayTerminal tmid
        | pkeys ^? ix ButtonLeft == Just False && inTermFocus w 
                -> doTerminalEffectLB (w ^?! terminals . ix tmid) w