jwoolley 2002/06/02 14:17:51
Modified: perl-framework/t/conf extra.conf.in
perl-framework/t/modules rewrite.t
Removed: perl-framework/t/htdocs/modules/rewrite append.pl.PL
Log:
This test breaks stuff :)
Revision Changes Path
1.40 +0 -3 httpd-test/perl-framework/t/conf/extra.conf.in
Index: extra.conf.in
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/conf/extra.conf.in,v
retrieving revision 1.39
retrieving revision 1.40
diff -u -d -u -r1.39 -r1.40
--- extra.conf.in 29 May 2002 03:22:56 -0000 1.39
+++ extra.conf.in 2 Jun 2002 21:17:51 -0000 1.40
@@ -125,7 +125,6 @@
RewriteMap numbers-rnd
rnd:@SERVERROOT@/htdocs/modules/rewrite/numbers.rnd
#RewriteMap numbers-dbm
dbm:@SERVERROOT@/htdocs/modules/rewrite/numbers.dbm
RewriteMap numbers-prg prg:@SERVERROOT@/htdocs/modules/rewrite/numbers.pl
- RewriteMap appendfoo "prg:@SERVERROOT@/htdocs/modules/rewrite/append.pl
foo"
RewriteMap lower int:tolower
<Directory @SERVERROOT@/htdocs/modules/rewrite>
@@ -160,8 +159,6 @@
RewriteRule ^([1-6])$ ${numbers-dbm:$1}.html [S=1]
RewriteCond %{ENV:MAPTYPE} =prg
RewriteRule ^([1-6])$ ${numbers-prg:$1}.html [L]
-
- RewriteRule ^(bar).html$ ${appendfoo:$1}.html [L]
</Directory>
</IfModule>
1.8 +1 -7 httpd-test/perl-framework/t/modules/rewrite.t
Index: rewrite.t
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/modules/rewrite.t,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -u -r1.7 -r1.8
--- rewrite.t 29 May 2002 03:22:57 -0000 1.7
+++ rewrite.t 2 Jun 2002 21:17:51 -0000 1.8
@@ -14,7 +14,7 @@
my @url = qw(forbidden gone perm temp 313);
my $r;
-plan tests => @map * @num + 4, have_module 'rewrite';
+plan tests => @map * @num + 3, have_module 'rewrite';
foreach (@map) {
foreach my $n (@num) {
@@ -52,9 +52,3 @@
chomp $r;
$r =~ s/\r//g;
ok ($r eq "JACKPOT");
-
-chomp ($r = GET_BODY("/modules/rewrite/bar.html"));
-ok t_cmp("pass",
- $r,
- "prg: map with arguments"
- );
