[Quest API] Add $target export to EVENT_INSPECT in Perl (#2891)

* [Quest API] Add $target export to EVENT_INSPECT in Perl

# Notes
- Exports `$target` to `EVENT_INSPECT`.
- Allows operators to get information from target directly instead of using entity list.

* Update client_packet.cpp
This commit is contained in:
Alex King
2023-02-12 23:43:38 -05:00
committed by GitHub
parent e8f01fb6ac
commit 2c75e8fcd4
2 changed files with 10 additions and 7 deletions
+3
View File
@@ -2043,6 +2043,9 @@ void PerlembParser::ExportEventVariables(
case EVENT_INSPECT: {
ExportVar(package_name.c_str(), "target_id", extradata);
if (extra_pointers && extra_pointers->size() == 1) {
ExportVar(package_name.c_str(), "target", "Mob", std::any_cast<Mob*>(extra_pointers->at(0)));
}
break;
}