From 12e5cba62bf4261140ce2a040268774f55ba092d Mon Sep 17 00:00:00 2001 From: justin Date: Sun, 5 Jan 2025 16:00:23 +0000 Subject: [PATCH] Start trying to remove _ssItems as much as possible --- src/Dodge/Creature/Action.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/Dodge/Creature/Action.hs b/src/Dodge/Creature/Action.hs index dcd8b7833..a1257dfa3 100644 --- a/src/Dodge/Creature/Action.hs +++ b/src/Dodge/Creature/Action.hs @@ -20,7 +20,7 @@ import Data.Maybe import Dodge.Base import Dodge.Creature.Action.Blink import Dodge.CreatureEffect -import Dodge.Data.SelectionList +--import Dodge.Data.SelectionList import Dodge.Data.World import Dodge.Default import Dodge.FloatFunction @@ -191,7 +191,8 @@ youDropItem :: World -> World youDropItem w = fromMaybe w $ do curpos <- you w ^? crManipulation . manObject . imSelectedItem - <|> fmap fst (IM.lookupMax =<< w ^? hud . hudElement . diSections . ix 0 . ssItems) +-- <|> fmap fst (IM.lookupMax =<< w ^? hud . hudElement . diSections . ix 0 . ssItems) + <|> fmap fst (IM.lookupMax (you w ^. crInv)) guard $ not $ _crInvLock (you w) return $ w