You are viewing a plain text version of this content. The canonical link for it is here.
Posted to apreq-cvs@httpd.apache.org by pg...@apache.org on 2006/09/19 09:46:22 UTC
svn commit: r447775 - in /httpd/apreq/trunk/glue/perl/t/apreq: big_input.t
cgi.t inherit.t request.t upload.t
Author: pgollucci
Date: Tue Sep 19 00:46:21 2006
New Revision: 447775
URL: http://svn.apache.org/viewvc?view=rev&rev=447775
Log:
s/have_/need_/
now we get a message why the tests are skipped
Modified:
httpd/apreq/trunk/glue/perl/t/apreq/big_input.t
httpd/apreq/trunk/glue/perl/t/apreq/cgi.t
httpd/apreq/trunk/glue/perl/t/apreq/inherit.t
httpd/apreq/trunk/glue/perl/t/apreq/request.t
httpd/apreq/trunk/glue/perl/t/apreq/upload.t
Modified: httpd/apreq/trunk/glue/perl/t/apreq/big_input.t
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/t/apreq/big_input.t?view=diff&rev=447775&r1=447774&r2=447775
==============================================================================
--- httpd/apreq/trunk/glue/perl/t/apreq/big_input.t (original)
+++ httpd/apreq/trunk/glue/perl/t/apreq/big_input.t Tue Sep 19 00:46:21 2006
@@ -19,7 +19,7 @@
my @big_key_num = (5, 15, 25);
my @big_keys = ('a'..'z');
-plan tests => @key_len * @key_num + @big_key_len * @big_key_num, have_lwp;
+plan tests => @key_len * @key_num + @big_key_len * @big_key_num, need_lwp;
# GET
Modified: httpd/apreq/trunk/glue/perl/t/apreq/cgi.t
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/t/apreq/cgi.t?view=diff&rev=447775&r1=447774&r2=447775
==============================================================================
--- httpd/apreq/trunk/glue/perl/t/apreq/cgi.t (original)
+++ httpd/apreq/trunk/glue/perl/t/apreq/cgi.t Tue Sep 19 00:46:21 2006
@@ -35,7 +35,7 @@
my @big_keys = ('a'..'z');
plan tests => 10 + @key_len * @key_num + @big_key_len * @big_key_num +
- @names * @methods, have_lwp && have_cgi;
+ @names * @methods, need_lwp && need_cgi;
require HTTP::Cookies;
Modified: httpd/apreq/trunk/glue/perl/t/apreq/inherit.t
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/t/apreq/inherit.t?view=diff&rev=447775&r1=447774&r2=447775
==============================================================================
--- httpd/apreq/trunk/glue/perl/t/apreq/inherit.t (original)
+++ httpd/apreq/trunk/glue/perl/t/apreq/inherit.t Tue Sep 19 00:46:21 2006
@@ -6,7 +6,7 @@
use Apache::TestUtil;
use Apache::TestRequest qw(GET_BODY UPLOAD_BODY);
-plan tests => 4, have_lwp;
+plan tests => 4, need_lwp;
my $module = 'TestApReq::inherit';
my $location = Apache::TestRequest::module2url($module);
Modified: httpd/apreq/trunk/glue/perl/t/apreq/request.t
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/t/apreq/request.t?view=diff&rev=447775&r1=447774&r2=447775
==============================================================================
--- httpd/apreq/trunk/glue/perl/t/apreq/request.t (original)
+++ httpd/apreq/trunk/glue/perl/t/apreq/request.t Tue Sep 19 00:46:21 2006
@@ -6,7 +6,7 @@
use Apache::TestUtil;
use Apache::TestRequest qw(GET_BODY UPLOAD_BODY);
-plan tests => 18, have_lwp;
+plan tests => 18, need_lwp;
my $module = 'TestApReq::request';
my $location = Apache::TestRequest::module2url($module);
Modified: httpd/apreq/trunk/glue/perl/t/apreq/upload.t
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/t/apreq/upload.t?view=diff&rev=447775&r1=447774&r2=447775
==============================================================================
--- httpd/apreq/trunk/glue/perl/t/apreq/upload.t (original)
+++ httpd/apreq/trunk/glue/perl/t/apreq/upload.t Tue Sep 19 00:46:21 2006
@@ -19,7 +19,7 @@
my @names = sort keys %types;
my @methods = sort qw/slurp fh tempname link io/;
-plan tests => @names * @methods, have_lwp;
+plan tests => @names * @methods, need_lwp;
foreach my $name (@names) {
my $url = ( ($name =~ /\.pod$/) ?