dougm 02/04/01 17:42:13
Modified: perl-framework/Apache-Test/lib/Apache TestRequest.pm
Log:
need to pass %$args rather than @_ to LWP::UserAgent->new since we
have added keep_alive => 1 with the -http11 command line arg
Revision Changes Path
1.67 +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.66
retrieving revision 1.67
diff -u -r1.66 -r1.67
--- TestRequest.pm 7 Mar 2002 04:50:24 -0000 1.66
+++ TestRequest.pm 2 Apr 2002 01:42:13 -0000 1.67
@@ -81,7 +81,7 @@
};
}
- eval { $UA ||= __PACKAGE__->new(@_); };
+ eval { $UA ||= __PACKAGE__->new(%$args); };
}
sub user_agent_request_num {
