Allow for swapping inventory items

2023-02-23 14:12:08 +00:00
parent 6fff71cdcc
commit 683acf8a05
9 changed files with 161 additions and 104 deletions
@@ -97,9 +97,6 @@ data Intention = Intention

 --deriving (Eq, Show, Read) --Generic, Flat)

-crSel :: Creature -> ManipulatedObject
-crSel = _manObject . _crManipulation
-
 makeLenses ''Creature
 makeLenses ''CreatureTargeting
 makeLenses ''Intention