You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by st...@apache.org on 2004/07/01 03:41:30 UTC
cvs commit: modperl-2.0/lib/Apache ParseSource.pm
stas 2004/06/30 18:41:30
Modified: lib/Apache ParseSource.pm
Log:
make Apache::ParseSource strict on warnings and fix issues
Revision Changes Path
1.57 +4 -2 modperl-2.0/lib/Apache/ParseSource.pm
Index: ParseSource.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/lib/Apache/ParseSource.pm,v
retrieving revision 1.56
retrieving revision 1.57
diff -u -u -r1.56 -r1.57
--- ParseSource.pm 18 Jun 2004 23:45:07 -0000 1.56
+++ ParseSource.pm 1 Jul 2004 01:41:29 -0000 1.57
@@ -15,6 +15,8 @@
package Apache::ParseSource;
use strict;
+use warnings FATAL => 'all';
+
use Apache::Build ();
use Config;
use File::Basename;
@@ -112,7 +114,7 @@
sub include_dirs {
my $self = shift;
- ($self->config->apxs(-q => 'INCLUDEDIR'),
+ ($self->config->apxs('-q' => 'INCLUDEDIR'),
$self->config->mp_include_dir);
}
@@ -137,7 +139,7 @@
mod_proxy mod_ssl ssl_ apr_anylock
apr_rmm ap_config mod_log_config
mod_perl modperl_);
- my $unwanted = qr|^$unwanted|;
+ $unwanted = qr|^$unwanted|;
my $wanted = '';
push @includes, find_includes_wanted($wanted, $unwanted, @dirs);