[Bug Fix] Make Perl TakeMoneyFromPP int64 (#2158)

This commit is contained in:
Kinglykrab
2022-05-08 13:17:46 -04:00
committed by GitHub
parent 9d784d0d9b
commit f370a6048f
+1 -1
View File
@@ -1432,7 +1432,7 @@ XS(XS_Client_TakeMoneyFromPP) {
Client *THIS;
bool has_money;
bool update_client = false;
uint32 copper = (uint32) SvUV(ST(1));
uint64 copper = (uint64) SvUV(ST(1));
VALIDATE_THIS_IS_CLIENT;
if (items == 3) {