Mad Killing remove traces of combat when it ends

Should stop infighting.

config/fxdata/magic.cfg

@@ -100,7 +100,7 @@ ShotModel = SHOT_FREEZE
 SpellPower = POWER_FREEZE
 SpellFlags = FREEZE
 Duration = 125
-SelfCasted = 1 50
+SelfCasted = 0 50
 SymbolSprites = 523 406
 
 [spell4]
@@ -184,7 +184,7 @@ ShotModel = SHOT_SLOW
 SpellPower = POWER_SLOW
 SpellFlags = SLOW
 Duration = 500
-SelfCasted = 1 50
+SelfCasted = 0 50
 SymbolSprites = 366 424
 
 [spell13]
@@ -201,6 +201,7 @@ ShotModel = SHOT_FEAR
 SpellFlags = FEAR
 ; Fear will last at least as long as the GameTurnsInFlee rule.
 Duration = 200
+SelfCasted = 0 968
 SymbolSprites = 817 819
 
 [spell15]
@@ -296,7 +297,7 @@ ShotModel = SHOT_DISEASE
 SpellPower = POWER_DISEASE
 SpellFlags = DISEASE
 Duration = 500
-SelfCasted = 1 59
+SelfCasted = 0 59
 SymbolSprites = 310 319
 
 [spell27]
@@ -307,7 +308,7 @@ SpellPower = POWER_CHICKEN
 SpellFlags = CHICKEN
 Countdown = 10
 Duration = 200
-SelfCasted = 1 109
+SelfCasted = 0 109
 SymbolSprites = 306 314
 
 [spell28]

src/thing_creature.c

@@ -1264,6 +1264,7 @@ TbBool clear_thing_spell_flags_f(struct Thing *thing, unsigned long spell_flags,
     && (creature_under_spell_effect(thing, CSAfF_MadKilling)))
     {
         clear_flag(cctrl->spell_flags, CSAfF_MadKilling);
+        remove_all_traces_of_combat(thing);
         cleared = true;
     }
     if (flag_is_set(spell_flags, CSAfF_Fear)