diff --git a/zone/perl_client.cpp b/zone/perl_client.cpp index ecb2c4d18..476c47599 100644 --- a/zone/perl_client.cpp +++ b/zone/perl_client.cpp @@ -1263,12 +1263,14 @@ XS(XS_Client_MovePC) THIS->MovePC(zoneID, x, y, z, heading); } else { - if (THIS->IsBot()) - _log(CLIENT__ERROR, "Perl(XS_Client_MovePC) attempted to process a type Bot reference"); - else if (THIS->IsMerc()) + if (THIS->IsMerc()) _log(CLIENT__ERROR, "Perl(XS_Client_MovePC) attempted to process a type Merc reference"); else if (THIS->IsNPC()) _log(CLIENT__ERROR, "Perl(XS_Client_MovePC) attempted to process a type NPC reference"); + #ifdef BOTS + else if (THIS->IsBot()) + _log(CLIENT__ERROR, "Perl(XS_Client_MovePC) attempted to process a type Bot reference"); + #endif else _log(CLIENT__ERROR, "Perl(XS_Client_MovePC) attempted to process an Unknown type reference"); @@ -1307,12 +1309,14 @@ XS(XS_Client_MovePCInstance) THIS->MovePC(zoneID, instanceID, x, y, z, heading); } else { - if (THIS->IsBot()) - _log(CLIENT__ERROR, "Perl(XS_Client_MovePCInstance) attempted to process a type Bot reference"); - else if (THIS->IsMerc()) + if (THIS->IsMerc()) _log(CLIENT__ERROR, "Perl(XS_Client_MovePCInstance) attempted to process a type Merc reference"); else if (THIS->IsNPC()) _log(CLIENT__ERROR, "Perl(XS_Client_MovePCInstance) attempted to process a type NPC reference"); + #ifdef BOTS + else if (THIS->IsBot()) + _log(CLIENT__ERROR, "Perl(XS_Client_MovePCInstance) attempted to process a type Bot reference"); + #endif else _log(CLIENT__ERROR, "Perl(XS_Client_MovePCInstance) attempted to process an Unknown type reference");