Make all items have an id an associated location

2022-08-01 23:50:26 +01:00
parent 237cd3e020
commit 82aedc3830
11 changed files with 123 additions and 84 deletions
@@ -31,7 +31,7 @@ import Dodge.Data.Item.Targeting
 data Item = Item
    { _itUse :: ItemUse
    , _itType :: ItemType
-    , _itID :: Maybe Int
+    , _itID :: Int
    , _itLocation :: ItemLocation
    , _itIsHeld :: Bool
    , _itEffect :: ItEffect