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'; }