Fix item location bug

This commit is contained in:
2026-05-16 12:21:19 +01:00
parent db2ce72076
commit 4bcea5e772
10 changed files with 159 additions and 148 deletions
+1 -1
View File
@@ -35,7 +35,7 @@ data ItemLocation
, _ilEquipSite :: Maybe EquipSite
}
| OnTurret {_ilTuID :: Int}
| OnFloor {_ilCloseSel :: Bool} -- {_ilFlID :: NewInt FloorInt}
| OnFloor
| InVoid
deriving (Eq, Show, Ord, Read) --Generic, Flat)