When building mod_perl with apxs as a DSO, MyConfig.pm looses track of the
location of apxs.  Therefore, when using 3rd parties perl modules that
require some access to Apache information, like Apache::src->new->inc, it
will most likely fail, unless apxs happens to be in a 'standard' location
or in your PATH.


-- 
+-----------------------------------------------+
| Philippe M. Chiasson  <[EMAIL PROTECTED]>        |
| SmartWorker http://www.smartworker.org        |
|     IM : gozerhbe  ICQ : gozer/18279998       |
|   64.8% computer corrupt according to         |
| http://www.freespeech.org/ljk/purity.html     |
+-----------------------------------------------+
You're much more likely to be knocked down by a snowball
than by an equivalent number of snowflakes. 
        -- Larry Wall

perl -e '$$=\${gozer};{$_=unpack(P26,pack(L,$$));/^Just Another Perl 
Hacker!\n$/&&print||$$++&&redo}'
Index: Makefile.PL
===================================================================
RCS file: /home/cvs/modperl-1/Makefile.PL,v
retrieving revision 1.184
diff -u -U10 -b -B -I'$Id' -I'$Revision' -r1.184 Makefile.PL
--- Makefile.PL 2001/05/01 17:08:25     1.184
+++ Makefile.PL 2001/05/25 17:15:18
@@ -1980,33 +1980,34 @@
 
 sub write_my_config {
     my $src = shift;
 
 # preparing and writing Configuration to Apache::MyConfig
     my %my_config = %callback_hooks;
     my @other_hooks = qw(APACHE_SRC SSL_BASE APXS PERL_USELARGEFILES
                          PERL_TRACE PERL_DEBUG APACI_ARGS
                          APACHE_PREFIX DO_HTTPD NO_HTTPD PREP_HTTPD
                          USE_APACI APACHE_HEADER_INSTALL
-                         PERL_STATIC_EXTS PERL_SSI PERL_SECTIONS);
+                         PERL_STATIC_EXTS PERL_SSI PERL_SECTIONS USE_APXS WITH_APXS);
     {
         no strict 'refs';
         $my_config{$_} = ${$_} for @other_hooks;
     }
     if ($win32_auto) {
         for (qw(APACHE_INC APACHE_LIB MODPERL_INC MODPERL_LIB)) {
             $my_config{$_} = $win32_path{$_};
         }
     }
 
     #need this alias for Apache::src backwards compat
     $my_config{'Apache_Src'} = $my_config{'APACHE_SRC'};
+    $my_config{'APXS'} = delete $my_config{'WITH_APXS'};
 
     my $my_config_dump = join ",\n",
         map { qq{'$_' => } .
               ($my_config{$_} =~ /^\d+$/ ? $my_config{$_} : qq{'$my_config{$_}'})
             } sort keys %my_config;
 
     local *FH;
     open FH, '>lib/Apache/MyConfig.pm'  ||
        die "Can't open lib/Apache/MyConfig.pm: $!";
     print FH <<EOT;

Reply via email to