mirror of
https://github.com/EQEmu/Server.git
synced 2026-05-22 16:28:28 +00:00
[Feature] Implement Custom Pet Names (#4594)
* rebase\tidy up to address commends * I blame git for this one * last typo * spaces * formating fixes I think? * Repository fixes * Cleanup --------- Co-authored-by: Akkadius <akkadius1@gmail.com>
This commit is contained in:
@@ -3229,6 +3229,11 @@ perl::array Perl_Client_GetInventorySlots(Client* self)
|
||||
return result;
|
||||
}
|
||||
|
||||
void Perl_Client_GrantPetNameChange(Client* self)
|
||||
{
|
||||
self->GrantPetNameChange();
|
||||
}
|
||||
|
||||
void Perl_Client_SetAAEXPPercentage(Client* self, uint8 percentage)
|
||||
{
|
||||
self->SetAAEXPPercentage(percentage);
|
||||
@@ -3335,6 +3340,7 @@ void perl_register_client()
|
||||
package.add("CanHaveSkill", &Perl_Client_CanHaveSkill);
|
||||
package.add("CashReward", &Perl_Client_CashReward);
|
||||
package.add("ChangeLastName", &Perl_Client_ChangeLastName);
|
||||
package.add("GrantPetNameChange", &Perl_Client_GrantPetNameChange);
|
||||
package.add("CharacterID", &Perl_Client_CharacterID);
|
||||
package.add("CheckIncreaseSkill", (bool(*)(Client*, int))&Perl_Client_CheckIncreaseSkill);
|
||||
package.add("CheckIncreaseSkill", (bool(*)(Client*, int, int))&Perl_Client_CheckIncreaseSkill);
|
||||
|
||||
Reference in New Issue
Block a user