Author: pgollucci
Date: Thu Sep  1 21:27:41 2005
New Revision: 266267

URL: http://svn.apache.org/viewcvs?rev=266267&view=rev
Log:
s/my(/my (/g

Modified:
    perl/modperl/trunk/t/compat/request_body.t

Modified: perl/modperl/trunk/t/compat/request_body.t
URL: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/t/compat/request_body.t?rev=266267&r1=266266&r2=266267&view=diff
==============================================================================
--- perl/modperl/trunk/t/compat/request_body.t (original)
+++ perl/modperl/trunk/t/compat/request_body.t Thu Sep  1 21:27:41 2005
@@ -73,7 +73,7 @@
 
 ### helper subs ###
 sub query {
-    my(%args) = (@_ % 2) ? %{+shift} : @_;
+    my (%args) = (@_ % 2) ? %{+shift} : @_;
     "$location?" . join '&', map { "$_=$args{$_}" } keys %args;
 }
 


Reply via email to