Remove inventory selection on item drop/pickup

2024-11-04 19:45:12 +00:00
parent 3f9b31a838
commit 489ff21e12
6 changed files with 17 additions and 20 deletions
@@ -74,7 +74,7 @@ drawInventory sss w cfig =
    curs = invCursorParams w
    iextra = fromMaybe mempty $ do
        inv <- w ^? cWorld . lWorld . creatures . ix 0 . crInv
-        guard =<< fmap (not . isFilteringInv) (w ^? hud . hudElement . diSections)
+        guard . not . isFilteringInv =<< (w ^? hud . hudElement . diSections)
        return . inventoryExtra sss cfig w $ invAdj inv

 drawRootCursor :: World