stas 2003/08/12 14:06:18
Modified: . Makefile.PL
lib/Apache Build.pm
Log:
style tweaks
Revision Changes Path
1.119 +1 -1 modperl-2.0/Makefile.PL
Index: Makefile.PL
===================================================================
RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
retrieving revision 1.118
retrieving revision 1.119
diff -u -r1.118 -r1.119
--- Makefile.PL 9 Aug 2003 01:51:46 -0000 1.118
+++ Makefile.PL 12 Aug 2003 21:06:18 -0000 1.119
@@ -311,7 +311,7 @@
$VERSION =~ s/(\d\d)(\d\d)$/$1_$2/;
open my $fh, 'Changes';
- while(<$fh>) {
+ while (<$fh>) {
if(/^=item.*-dev/) {
$VERSION .= '-dev';
last;
1.134 +1 -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.133
retrieving revision 1.134
diff -u -r1.133 -r1.134
--- Build.pm 12 Aug 2003 20:46:57 -0000 1.133
+++ Build.pm 12 Aug 2003 21:06:18 -0000 1.134
@@ -172,7 +172,7 @@
my $config_vars_file = catfile $self->{dir},
"build", "config_vars.mk";
if (open my $fh, $config_vars_file) {
- while(<$fh>) {
+ while ((<$fh>) {
if(/MPM_NAME = (\w+)/) {
$mpm_name = $1;
last;