Start trying to remove _ssItems as much as possible

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