pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2026-06-10 02:31:03 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[Quest API] Export $item to EVENT_PLAYER_PICKUP in Perl. (#2875)

Browse Source 
* [Quest API] Export $item to EVENT_PLAYER_PICKUP in Perl.

# Notes
- Exports `$item` to `EVENT_PLAYER_PICKUP` in Perl so that you have access to the item itself.

* Optional parsing.

* Update object.cpp

* Update object.cpp
This commit is contained in:
Alex King
2023-02-13 00:52:47 -05:00
committed by GitHub
parent 5b24d38d1e
commit ca0e85b4bc
2 changed files with 17 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/embparser.cpp
+3
View File
@@ -1680,6 +1680,9 @@ void PerlembParser::ExportEventVariables(
case EVENT_PLAYER_PICKUP: {
ExportVar(package_name.c_str(), "picked_up_id", data);
ExportVar(package_name.c_str(), "picked_up_entity_id", extradata);
if (extra_pointers && extra_pointers->size() == 1) {
ExportVar(package_name.c_str(), "item", "QuestItem", std::any_cast<EQ::ItemInstance*>(extra_pointers->at(0)));
}
break;
}