Reinstate HammerTrigger (no weapons use it currently)

src/Dodge/Creature/Statistics.hs

@@ -66,6 +66,7 @@ strFromHeldItem cr = fromMaybe 0 $ do
 itemWeight :: Item -> Int
 itemWeight it = case it ^. itType of
     HELD hit -> heldItemWeight hit
+    LASER -> 15
     _ -> 1
 
 heldItemWeight :: HeldItemType -> Int
@@ -99,7 +100,6 @@ heldItemWeight = \case
     BLOWTORCH -> 10
     SPARKGUN -> 15
     TESLAGUN -> 15
-    LASER -> 15
     TRACTORGUN -> 10
     RLAUNCHER -> 20
     RLAUNCHERX{} -> 20