Add shrinkability and cursed items

src/Dodge/Default/Weapon.hs

@@ -3,8 +3,6 @@ module Dodge.Default.Weapon
 import Dodge.Data
 import Dodge.Item.Weapon.ExtraEffect
 import Dodge.Item.Weapon.InventoryDisplay
-import Dodge.Item.Attachment.Data
-import Dodge.Item.Data
 import Picture
 import ShapePicture
 
@@ -12,6 +10,7 @@ import Linear.V3
 defaultGun :: Item
 defaultGun = Weapon 
     { _itName = "default"
+    , _itCurseStatus = Uncursed
     , _itIdentity = Pistol
     , _wpMaxAmmo = 15
     , _wpLoadedAmmo = 15