Work on weapon attachments

2023-09-25 13:38:47 +01:00
parent f9c6769262
commit 0a7f5079ad
12 changed files with 28 additions and 34 deletions
@@ -25,7 +25,7 @@ import Geometry
 import Picture

 defaultEquipment :: Item
-defaultEquipment = defaultItem & itUse .~ defaultEquipUse
+defaultEquipment = defaultHeldItem & itUse .~ defaultEquipUse

 defaultFlIt :: FloorItem
 defaultFlIt = FlIt{_flItRot = 0, _flIt = defaultConsumable, _flItPos = V2 0 0, _flItID = 0}