You are viewing a plain text version of this content. The canonical link for it is here.
Posted to test-cvs@httpd.apache.org by do...@apache.org on 2001/11/01 22:45:57 UTC
cvs commit: httpd-test/perl-framework/t/http11 basicauth.t chunked.t
dougm 01/11/01 13:45:57
Modified: perl-framework/Apache-Test/lib/Apache TestRequest.pm
perl-framework/t/http11 basicauth.t chunked.t
Log:
adjustments for libwww-perl 5.60
Revision Changes Path
1.50 +7 -5 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.49
retrieving revision 1.50
diff -u -r1.49 -r1.50
--- TestRequest.pm 2001/11/01 21:11:50 1.49
+++ TestRequest.pm 2001/11/01 21:45:57 1.50
@@ -34,9 +34,10 @@
sub install_http11 {
eval {
die "no LWP" unless $have_lwp;
- LWP->VERSION(5.5396); #minimal version
- require LWP::Protocol::http11;
- LWP::Protocol::implementor('http', 'LWP::Protocol::http11');
+ LWP->VERSION(5.60); #minimal version
+ require LWP::Protocol::http;
+ #LWP::Protocol::http10 is used by default
+ LWP::Protocol::implementor('http', 'LWP::Protocol::http');
};
}
@@ -68,9 +69,10 @@
$args->{keep_alive} ||= $ENV{APACHE_TEST_HTTP11};
if ($args->{keep_alive}) {
+ install_http11();
eval {
- require LWP::Protocol::https11;
- LWP::Protocol::implementor('https', 'LWP::Protocol::https11');
+ require LWP::Protocol::https; #https10 is the default
+ LWP::Protocol::implementor('https', 'LWP::Protocol::https');
};
}
1.4 +1 -1 httpd-test/perl-framework/t/http11/basicauth.t
Index: basicauth.t
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/http11/basicauth.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- basicauth.t 2001/09/18 15:41:03 1.3
+++ basicauth.t 2001/11/01 21:45:57 1.4
@@ -9,7 +9,7 @@
Apache::TestRequest::user_agent(keep_alive => 1);
Apache::TestRequest::scheme('http')
- unless have_module 'LWP::Protocol::https11';
+ unless have_module 'LWP::Protocol::https10'; #lwp 5.60
plan tests => 3, have_module 'authany';
1.10 +1 -1 httpd-test/perl-framework/t/http11/chunked.t
Index: chunked.t
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/http11/chunked.t,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- chunked.t 2001/09/18 15:41:03 1.9
+++ chunked.t 2001/11/01 21:45:57 1.10
@@ -7,7 +7,7 @@
Apache::TestRequest::user_agent(keep_alive => 1);
Apache::TestRequest::scheme('http')
- unless have_module 'LWP::Protocol::https11';
+ unless have_module 'LWP::Protocol::https10'; #lwp 5.60
#chunked encoding is optional and will only be used if
#response is > 4*AP_MIN_BYTES_TO_WRITE (see server/protocol.c)