dougm 02/04/02 10:33:05
Modified: perl-framework/Apache-Test/lib/Apache TestCommonPost.pm
perl-framework/t/ssl proxy.t
Log:
test itself needs to reset the UA rather than TestCommonPost::lwp_init,
incase post tests are not run
Revision Changes Path
1.2 +1 -1
httpd-test/perl-framework/Apache-Test/lib/Apache/TestCommonPost.pm
Index: TestCommonPost.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestCommonPost.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- TestCommonPost.pm 2 Apr 2002 04:08:33 -0000 1.1
+++ TestCommonPost.pm 2 Apr 2002 18:33:05 -0000 1.2
@@ -45,7 +45,7 @@
sub lwp_init {
use vars qw($UA $Location);
- $UA = Apache::TestRequest::user_agent(reset => 1);
+ $UA = Apache::TestRequest::user_agent();
$Location = shift;
}
1.6 +1 -0 httpd-test/perl-framework/t/ssl/proxy.t
Index: proxy.t
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/ssl/proxy.t,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- proxy.t 2 Apr 2002 04:11:22 -0000 1.5
+++ proxy.t 2 Apr 2002 18:33:05 -0000 1.6
@@ -73,4 +73,5 @@
};
Apache::TestCommon::run_post_test($post_module) if $post_tests;
+ Apache::TestRequest::user_agent(reset => 1);
}