Continue inventory tweak
This commit is contained in:
@@ -12,7 +12,7 @@ youc w = w ^?! lWorld . creatures . ix 0
|
||||
|
||||
yourItem :: World -> Maybe Item
|
||||
yourItem w = do
|
||||
i <- you w ^? crManipulation . isel . ispItem
|
||||
i <- you w ^? crManipulation . manObject . inInventory . ispItem
|
||||
_crInv (you w) IM.!? i
|
||||
|
||||
yourInv :: World -> IM.IntMap Item
|
||||
|
||||
Reference in New Issue
Block a user