Hi,

Because of the lines in lib/mod_perl2.pm
# this stuff is here to assist back compat
# basically, if you
#  PerlModule mod_perl2
# or take similar steps to load mod_perl2 at
# startup you are protected against loading mod_perl.pm
# (either 1.0 or 1.99) at a later time by accident.
$mod_perl::VERSION = $mod_perl2::VERSION;
$INC{"mod_perl.pm"} = __FILE__;

Apache2::Status Loaded Modules output displays
mod_perl        2.000002        Mon Aug 22 22:55:02 2005        
/usr/home/pgollucci/dev/apps/mod_perl-2.0.2/lib/mod_perl2.pm
mod_perl2       2.000002        Mon Aug 22 22:55:02 2005        
/usr/home/pgollucci/dev/apps/mod_perl-2.0.2/lib/mod_perl2.pm

Which is confusing to me at least.

This suppresses the printing of mod_perl.pm which will be especially confusing 
if you have mp1 and mp2 in the same lib tree.

Index: Status.pm
===================================================================
--- Status.pm   (revision 279713)
+++ Status.pm   (working copy)
@@ -210,6 +210,7 @@
         next if $file =~ m:^/:;
         next unless $file =~ m:\.pm:;
         next unless $INC{$file}; #e.g. fake Apache2/TieHandle.pm
+        next if $file eq 'mod_perl.pm';

         no strict 'refs';
         (my $module = $file) =~ s,/,::,g;


--
END
------------------------------------------------------------
    What doesn't kill us can only make us stronger.
                Nothing is impossible.
                                
Philip M. Gollucci ([EMAIL PROTECTED]) 301.254.5198
Consultant / http://p6m7g8.net/Resume/
Senior Developer / Liquidity Services, Inc.
  http://www.liquidityservicesinc.com
       http://www.liquidation.com
       http://www.uksurplus.com
       http://www.govliquidation.com
       http://www.gowholesale.com


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to