Cleanup

2024-09-30 12:54:31 +01:00
parent 65564c993b
commit fc5539cb38
58 changed files with 802 additions and 1255 deletions
@@ -9,7 +9,7 @@ medkit :: Int -> Item
 medkit i =
    defaultConsumable
        & itUse . cUse .~ CHeal i
-        & itType . iyBase .~ CONSUMABLE (MEDKIT i)
+        & itType .~ CONSUMABLE (MEDKIT i)

 heal25 :: Int -> World -> Maybe World
 heal25 = heal 25