Add bee crits
This commit is contained in:
@@ -34,6 +34,8 @@ crWarningSounds cr = case cr ^. crType of
|
||||
AutoCrit -> mempty
|
||||
BarrelCrit{} -> mempty
|
||||
LampCrit{} -> mempty
|
||||
BeeCrit{} -> mempty
|
||||
HiveCrit{} -> mempty
|
||||
|
||||
crDeathSounds :: Creature -> DeathType -> [SoundID]
|
||||
crDeathSounds cr dt = case cr ^. crType of
|
||||
@@ -47,6 +49,8 @@ crDeathSounds cr dt = case cr ^. crType of
|
||||
AutoCrit -> mempty
|
||||
BarrelCrit{} -> mempty
|
||||
LampCrit{} -> mempty
|
||||
BeeCrit{} -> defaultDeathSounds dt
|
||||
HiveCrit{} -> defaultDeathSounds dt
|
||||
|
||||
defaultDeathSounds :: DeathType -> [SoundID]
|
||||
defaultDeathSounds = \case
|
||||
|
||||
Reference in New Issue
Block a user