Work on pickup and putdown of inventory items

2021-11-30 16:44:33 +00:00
parent 27b1a6da9e
commit 3754627e0d
10 changed files with 42 additions and 60 deletions
@@ -25,6 +25,7 @@ import Control.Lens
 grenade :: Item
 grenade = Throwable
    { _itName = "GRENADE " ++ show fuseTime
+    , _itInvSize = 1
    , _itDimension = defaultItemDimension
    , _itCurseStatus = Uncursed
    , _itIdentity = Grenade