Reinstate HammerTrigger (no weapons use it currently)

src/Dodge/Item/Draw/SPic.hs

@@ -51,6 +51,7 @@ itemSPic it = case it ^. itType of
     BINGATE -> defSPic
     UNIGATE -> defSPic
     NULGATE -> defSPic
+    LASER -> lasGunPic it
 
 craftItemSPic :: CraftType -> Shape
 craftItemSPic = \case
@@ -273,7 +274,6 @@ heldItemSPic ht it = case ht of
     BLOWTORCH -> flamerPic it
     SPARKGUN -> teslaGunPic
     TESLAGUN -> teslaGunPic
-    LASER -> lasGunPic it
     TRACTORGUN -> tractorGunPic it
     RLAUNCHER -> rlauncherPic it
     RLAUNCHERX _ -> rlauncherPic it