geoff 2004/02/16 11:50:12
Modified: t/conf extra.last.conf.in
Log:
change <Perl> to <Perl > to maintain back compat to 2.0.46
Revision Changes Path
1.16 +1 -1 modperl-2.0/t/conf/extra.last.conf.in
Index: extra.last.conf.in
===================================================================
RCS file: /home/cvs/modperl-2.0/t/conf/extra.last.conf.in,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -r1.15 -r1.16
--- extra.last.conf.in 11 Feb 2004 01:24:19 -0000 1.15
+++ extra.last.conf.in 16 Feb 2004 19:50:12 -0000 1.16
@@ -34,7 +34,7 @@
use File::Spec;
my $file = File::Spec->catfile('@ServerRoot@', 'conf', 'perlsection.conf');
open my $fh, ">$file" or die "Can't open $file: $!";
- print $fh join "\n", qw(<Perl> $TestDirective::perl::Included++; </Perl>);
+ print $fh join "\n", ('<Perl >', '$TestDirective::perl::Included++;',
'</Perl>');
close $fh;
$Include = $file;
</Perl>
