Cleanup scope zooming

2023-01-07 10:43:53 +00:00
parent 87ea7da1d4
commit 6b259fa200
8 changed files with 54 additions and 74 deletions
@@ -26,6 +26,7 @@ itemFromHeldType :: HeldItemType -> Item
 itemFromHeldType ht = case ht of
    KEYCARD i -> keyCard i
    TORCH -> torch
+    BINOCULARS -> binoculars
    SHATTERGUN -> shatterGun
    BANGSTICK i -> bangStick i
    PISTOL -> pistol