Author: pgollucci
Date: Thu Sep 1 21:29:34 2005
New Revision: 266273
URL: http://svn.apache.org/viewcvs?rev=266273&view=rev
Log:
s/my(/my (/g
Modified:
perl/modperl/trunk/t/modperl/setupenv2.t
Modified: perl/modperl/trunk/t/modperl/setupenv2.t
URL:
http://svn.apache.org/viewcvs/perl/modperl/trunk/t/modperl/setupenv2.t?rev=266273&r1=266272&r2=266273&view=diff
==============================================================================
--- perl/modperl/trunk/t/modperl/setupenv2.t (original)
+++ perl/modperl/trunk/t/modperl/setupenv2.t Thu Sep 1 21:29:34 2005
@@ -17,7 +17,7 @@
plan tests => 2 + scalar(@{ $expected{mixed} }) + scalar(@{ $expected{perl} });
-while (my($k, $v) = each %expected) {
+while (my ($k, $v) = each %expected) {
my @expected = @$v;
my $elements = scalar @expected;
my $received = GET_BODY "$location?$k";