Cleanup, hlints

2025-07-12 21:35:35 +01:00
parent 5544e891c5
commit dc631263da
9 changed files with 58 additions and 74 deletions
@@ -47,7 +47,7 @@ doWdWd we = case we of
        cr <- w ^? cWorld . lWorld . creatures . ix cid
        --itree <- allInvLocs (cr ^. crInv) ^? ix invid . _2 . locLDT
        loc <- invIndents (cr ^. crInv) ^? ix invid . _2
-        return $ heldEffectMuzzles (loc) cr w
+        return $ heldEffectMuzzles loc cr w

 accessTerminal :: Maybe Int -> World -> World
 accessTerminal mtmid w = fromMaybe w $ do