From 1bcb5c72a53a20b7491fba644e2aad6376d123eb Mon Sep 17 00:00:00 2001
From: hateborne <hateborne@gmail.com>
Date: Mon, 25 May 2015 10:44:15 -0400
Subject: [PATCH] Making $npc->RemoveFromHateList actually work

$npc->RemoveFromHateList is a mob function, not an NPC function. Casting
to Mob to let it work.
---
 zone/perl_npc.cpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/zone/perl_npc.cpp b/zone/perl_npc.cpp
index 0c9cec797..861759d12 100644
--- a/zone/perl_npc.cpp
+++ b/zone/perl_npc.cpp
@@ -823,7 +823,7 @@ XS(XS_NPC_RemoveFromHateList)
 		if(ent == nullptr)
 			Perl_croak(aTHX_ "ent  is nullptr, avoiding crash.");
 
-		THIS->RemoveFromHateList(ent);
+		THIS->CastToMob()->RemoveFromHateList(ent);
 
 	}
 	XSRETURN_EMPTY;