Alright, I think I figured it out. There may be other changes needed, but for now my forum seems to be working.
In GT/CGI.pm, the mod_perl2 tests should look like this:
if (MOD_PERL and MOD_PERL >= 2 and $Apache::ServerStarting != 1) {
require APR::Pool;
Apache2::RequestUtil->request->pool->cleanup_register(\&reset_env);
}
elsif (MOD_PERL and MOD_PERL >= 1.99 and $Apache::ServerStarting != 1) {
require Apache2;
require APR::Pool;
Apache->request->pool->cleanup_register(\&reset_env);
}
In GT/Base.pm, the mod_perl2 tests should look like this:
if (MOD_PERL and MOD_PERL >= 2 and $Apache::ServerStarting != 1) {
require APR::Pool;
Apache2::RequestUtil->request->pool->cleanup_register(sub { $self->_cleanup_obj($msg_pkg, $is_hash) });
}
elsif (MOD_PERL and MOD_PERL >= 1.99 and $Apache::ServerStarting != 1) {
require Apache2;
require APR::Pool;
Apache->request->pool->cleanup_register(sub { $self->_cleanup_obj($msg_pkg, $is_hash) });
}
In GT/CGI.pm, the mod_perl2 tests should look like this:
Code:
if (MOD_PERL and MOD_PERL >= 2 and $Apache::ServerStarting != 1) {
require APR::Pool;
Apache2::RequestUtil->request->pool->cleanup_register(\&reset_env);
}
elsif (MOD_PERL and MOD_PERL >= 1.99 and $Apache::ServerStarting != 1) {
require Apache2;
require APR::Pool;
Apache->request->pool->cleanup_register(\&reset_env);
}
In GT/Base.pm, the mod_perl2 tests should look like this:
Code:
if (MOD_PERL and MOD_PERL >= 2 and $Apache::ServerStarting != 1) {
require APR::Pool;
Apache2::RequestUtil->request->pool->cleanup_register(sub { $self->_cleanup_obj($msg_pkg, $is_hash) });
}
elsif (MOD_PERL and MOD_PERL >= 1.99 and $Apache::ServerStarting != 1) {
require Apache2;
require APR::Pool;
Apache->request->pool->cleanup_register(sub { $self->_cleanup_obj($msg_pkg, $is_hash) });
}
