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";


Reply via email to