cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestRequest.pm

[dougm]

dougm       01/11/05 09:36:29

  Modified:    perl-framework/Apache-Test/lib/Apache TestRequest.pm
  Log:
  don't bother printing @rest args in lwp trace output
  same info will have already been propagated to headers, etc.
  
  Revision  Changes    Path
  1.51      +1 -1      
httpd-test/perl-framework/Apache-Test/lib/Apache/TestRequest.pm
  
  Index: TestRequest.pm
  ===================================================================
  RCS file: 
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRequest.pm,v
  retrieving revision 1.50
  retrieving revision 1.51
  diff -u -r1.50 -r1.51
  --- TestRequest.pm    2001/11/01 21:45:57     1.50
  +++ TestRequest.pm    2001/11/05 17:36:29     1.51
  @@ -299,7 +299,7 @@
           my($url, @rest) = @_;
           $name = (split '::', $name)[-1]; #strip HTTP::Request::Common::
           $url = resolve_url($url);
  -        print "$name $url @rest:\n", $r->request->headers->as_string, "\n";
  +        print "$name $url:\n", $r->request->headers->as_string, "\n";
           print lwp_as_string($r, $DebugLWP > 1);
       }