Move weapon repetitions into trigger type

2025-06-04 13:23:40 +01:00
parent e77721fe7d
commit 0cb7b54180
9 changed files with 146 additions and 143 deletions
@@ -48,6 +48,7 @@ doWdWd we = case we of
 doItCrWdWd :: ItCrWdWd -> LabelDoubleTree ComposeLinkType Item -> Creature -> World -> World
 doItCrWdWd icww = case icww of
    ItCrWdItemHeldEffect -> heldEffect InitialPress
+    ItCrWdItemHeldEffectNoHammer -> heldEffectNoHammerCheck

 accessTerminal :: Maybe Int -> World -> World
 accessTerminal mtmid w = fromMaybe w $ do