randyk 2004/06/16 10:03:27
Modified: t/hooks authen.t
t/compat conn_authen.t
t/directive perl.t
Log:
skip tests unless have_auth is true.
Revision Changes Path
1.6 +1 -1 modperl-2.0/t/hooks/authen.t
Index: authen.t
===================================================================
RCS file: /home/cvs/modperl-2.0/t/hooks/authen.t,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- authen.t 18 Apr 2003 06:18:57 -0000 1.5
+++ authen.t 16 Jun 2004 17:03:27 -0000 1.6
@@ -4,7 +4,7 @@
use Apache::Test;
use Apache::TestRequest;
-plan tests => 4, \&have_lwp;
+plan tests => 4, (\&have_lwp && \&have_auth);
my $location = "/TestHooks__authen";
1.3 +1 -1 modperl-2.0/t/compat/conn_authen.t
Index: conn_authen.t
===================================================================
RCS file: /home/cvs/modperl-2.0/t/compat/conn_authen.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- conn_authen.t 18 Apr 2003 06:18:55 -0000 1.2
+++ conn_authen.t 16 Jun 2004 17:03:27 -0000 1.3
@@ -4,7 +4,7 @@
use Apache::Test;
use Apache::TestRequest;
-plan tests => 1, \&have_lwp;
+plan tests => 1, (\&have_lwp && \&have_auth);
my $location = "/TestCompat__conn_authen";
1.3 +1 -1 modperl-2.0/t/directive/perl.t
Index: perl.t
===================================================================
RCS file: /home/cvs/modperl-2.0/t/directive/perl.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- perl.t 19 Dec 2003 01:17:32 -0000 1.2
+++ perl.t 16 Jun 2004 17:03:27 -0000 1.3
@@ -4,7 +4,7 @@
use Apache::Test;
use Apache::TestRequest;
-plan tests => 8;
+plan tests => 8, \&have_auth;
#so we don't have to require lwp
my @auth = (Authorization => 'Basic ZG91Z206Zm9v'); #dougm:foo
