Merge 587422bdc1 into 9b3f9f356d

zone/CMakeLists.txt

@@ -501,7 +501,7 @@ if (EQEMU_BUILD_STATIC AND LUA_LIBRARY)
 endif()
 
 # perl unity build links against perl_zone
-target_link_libraries(perl_zone PRIVATE perlbind fmt::fmt unofficial::libmariadb ${PERL_LIBRARY_LIBS})
+target_link_libraries(perl_zone PRIVATE perlbind fmt::fmt unofficial::libmariadb)
 if (EQEMU_BUILD_STATIC AND PERL_LIBRARY)
     target_link_libraries(zone PRIVATE ${PERL_LIBRARY})
 endif()

zone/embperl.cpp

@@ -75,7 +75,7 @@ void Embperl::DoInit()
 		throw "Failed to init Perl (perl_alloc)";
 	}
 	PERL_SET_CONTEXT(my_perl);
-	PL_curinterp = (PerlInterpreter*)(my_perl);
+	PERL_SET_INTERP(my_perl);
 	PL_perl_destruct_level = 1;
 	perl_construct(my_perl);
 	perl_parse(my_perl, xs_init, argc, argv, nullptr);
@@ -181,7 +181,7 @@ Embperl::~Embperl()
 void Embperl::Reinit()
 {
 	PERL_SET_CONTEXT(my_perl);
-	PL_curinterp = (PerlInterpreter*)(my_perl);
+	PERL_SET_INTERP(my_perl);
 	PL_perl_destruct_level = 1;
 	perl_destruct(my_perl);
 	perl_free(my_perl);