stas 2004/08/06 19:15:51
Modified: perl-framework/t/filter case.t
perl-framework/t/protocol echo.t nntp-like.t
Log:
small tweaks
Revision Changes Path
1.6 +1 -1 httpd-test/perl-framework/t/filter/case.t
Index: case.t
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/filter/case.t,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -u -r1.5 -r1.6
--- case.t 4 Aug 2004 15:44:08 -0000 1.5
+++ case.t 7 Aug 2004 02:15:50 -0000 1.6
@@ -14,7 +14,7 @@
my @filter = ('X-AddOutputFilter' => 'CaseFilter'); #mod_client_add_filter
-my %modules = map { $_, Apache::Test::have_module($_) } keys %urls;
+my %modules = map { $_, have_module($_) } keys %urls;
my $tests = 1 + grep { $modules{$_} } keys %urls;
1.3 +1 -1 httpd-test/perl-framework/t/protocol/echo.t
Index: echo.t
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/protocol/echo.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -u -r1.2 -r1.3
--- echo.t 16 Nov 2001 23:44:34 -0000 1.2
+++ echo.t 7 Aug 2004 02:15:50 -0000 1.3
@@ -15,7 +15,7 @@
my $vars = Apache::Test::vars();
my @modules = qw(mod_echo);
-if (Apache::Test::have_ssl()) {
+if (have_ssl) {
$tests *= 2;
unshift @modules, 'mod_echo_ssl';
}
1.3 +1 -1 httpd-test/perl-framework/t/protocol/nntp-like.t
Index: nntp-like.t
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/protocol/nntp-like.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -u -r1.2 -r1.3
--- nntp-like.t 13 May 2004 11:34:32 -0000 1.2
+++ nntp-like.t 7 Aug 2004 02:15:51 -0000 1.3
@@ -12,7 +12,7 @@
my $vars = Apache::Test::vars();
my @modules = qw(mod_nntp_like);
-if (Apache::Test::have_ssl()) {
+if (have_ssl) {
$tests *= 2;
unshift @modules, 'mod_nntp_like_ssl';
}