Cleanup, delete hotkeys when deleting item from inventory

src/Dodge/Item/Scope.hs

@@ -15,6 +15,7 @@ module Dodge.Item.Scope (
     bulletModule,
     bulletPayloadModule,
     smokeReducer,
+    itemScanner,
 ) where
 
 import Dodge.Item.Attach
@@ -46,6 +47,12 @@ stickyMod =
         & itType .~ STICKYMOD
         & itUse .~ UseNothing
 
+itemScanner :: Item
+itemScanner =
+    defaultHeldItem
+        & itType .~ ITEMSCANNER
+        & itUse .~ UseNothing
+
 
 bulletModule :: BulletMod -> Item
 bulletModule bm =
@@ -80,7 +87,7 @@ remoteDetonator = makeAttach REMOTEDETONATOR
 joystick :: Item
 joystick = makeAttach JOYSTICK
 --    & itUse . uaParams .~ APLinkProjectile Nothing 
---
+
 gimbal :: Item
 gimbal = makeAttach GIMBAL