Remove left click/hotkey item data types

src/Dodge/Item/Held.hs

@@ -11,6 +11,7 @@ module Dodge.Item.Held (
     module Dodge.Item.Held.BatteryGuns,
 ) where
 
+import Dodge.Item.Weapon.Utility
 import Dodge.Data.Item
 import Dodge.Item.Held.Launcher
 import Dodge.Item.Held.BatteryGuns
@@ -24,6 +25,11 @@ import Dodge.Item.Held.SprayGuns
 
 itemFromHeldType :: HeldItemType -> Item
 itemFromHeldType ht = case ht of
+    REWINDER -> rewinder
+    TIMESTOPPER -> timeStopper
+    TIMESCROLLER -> timeScroller
+    BLINKERUNSAFE -> unsafeBlinker
+    BLINKER -> blinker
     KEYCARD i -> keyCard i
     TORCH -> torch
     SHATTERGUN -> shatterGun
@@ -64,5 +70,5 @@ itemFromHeldType ht = case ht of
 --    REMOTELAUNCHER -> remoteLauncher
     POISONSPRAYER -> poisonSprayer
     DRONELAUNCHER -> undefined
-    DETECTOR d -> clickDetector d
+    DETECTOR d -> detector d
     FLATSHIELD -> flatShield