Hi,

I made a couple of changes to Apache::DBI to allow connect_on_init to work
with mod_perl2. Here's the diff if anyone is interested:

diff DBI.pm DBI.pm.old
11,12d10
< use constant MP2 => $mod_perl2::VERSION >= 1.99;
<
37,44c35,37
<     if (MP2) {
<        Apache2::ServerUtil->server->push_handlers(PerlChildInitHandler => 
\&childinit);
<     }
<     else {
<        carp "Apache.pm was not loaded\n" and return unless $INC{'Apache.pm'};
<        if([EMAIL PROTECTED] and Apache->can('push_handlers')) {
<            Apache->push_handlers(PerlChildInitHandler => \&childinit);
<        }
---
    carp "Apache.pm was not loaded\n" and return unless $INC{'Apache.pm'};
    if([EMAIL PROTECTED] and Apache->can('push_handlers')) {
        Apache->push_handlers(PerlChildInitHandler => \&childinit);


--Mark

Reply via email to