dougm       01/04/27 14:12:26

  Modified:    lib/Apache Build.pm
  Log:
  warn if apxs query failes
  
  Revision  Changes    Path
  1.43      +3 -1      modperl-2.0/lib/Apache/Build.pm
  
  Index: Build.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/lib/Apache/Build.pm,v
  retrieving revision 1.42
  retrieving revision 1.43
  diff -u -r1.42 -r1.43
  --- Build.pm  2001/04/20 17:09:16     1.42
  +++ Build.pm  2001/04/27 21:12:25     1.43
  @@ -57,7 +57,9 @@
   
       return '' unless $apxs and -x $apxs;
   
  -    qx($apxs @_ 2>/dev/null);
  +    my $val = qx($apxs @_ 2>/dev/null);
  +    warn "ERROR: `$apxs query @_' failed\n" unless $val;
  +    $val;
   }
   
   sub apxs_cflags {
  
  
  

Reply via email to