Tweaks concerning item types

2024-12-18 11:39:12 +00:00
parent d0ef2628ce
commit d405747bd5
21 changed files with 98 additions and 69 deletions
@@ -72,7 +72,7 @@ itemFromEquipType et = case et of
    BULLETBELTPACK -> bulletBeltPack
    BULLETBELTBRACER -> bulletBeltBracer
    AUTODETECTOR d -> autoDetector d
-    PULSECHECKER -> pulseChecker
+    WRIST_ECG -> pulseChecker

 itemFromLeftType :: LeftItemType -> Item
 itemFromLeftType lt = case lt of