diff --git a/src/spells/combatspells.c b/src/spells/combatspells.c
index d7fdcbf54..9d64d23de 100644
--- a/src/spells/combatspells.c
+++ b/src/spells/combatspells.c
@@ -774,9 +774,10 @@ sp_wolfhowl(fighter * fi, int level, double power, spell * sp)
   attrib *a;
   message * msg;
   int force = (int)(get_force(power, 3)/2);
-  unit *u = create_unit(r, mage->faction, force, new_race[RC_WOLF], 0, NULL, mage);
+  unit * u = create_unit(r, mage->faction, force, new_race[RC_WOLF], 0, NULL, mage);
   unused(sp);
 
+  leave(u, true);
   setstatus(u, ST_FIGHT);
 
   set_level(u, SK_WEAPONLESS, (int)(power/3));