jwoolley 2003/07/11 16:05:44
Modified: perl-framework/t/modules include.t
Added: perl-framework/t/htdocs/modules/include/bucketeer y6.shtml
Log:
an additional test for mod_include
Submitted By: Ron Park <[EMAIL PROTECTED]>
Revision Changes Path
1.1
httpd-test/perl-framework/t/htdocs/modules/include/bucketeer/y6.shtml
Index: y6.shtml
===================================================================
BeforeIf<!--#if expr="$X" -->preIfBlockpostIfBlock<!--#else
-->ElseBlock<!--#endif -->AfterIf
1.25 +10 -3 httpd-test/perl-framework/t/modules/include.t
Index: include.t
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/t/modules/include.t,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -d -u -r1.24 -r1.25
--- include.t 11 Jul 2003 09:00:43 -0000 1.24
+++ include.t 11 Jul 2003 23:05:44 -0000 1.25
@@ -70,11 +70,11 @@
#
# in addition to $tests, there are 1 GET test, 9 XBitHack tests,
-# 2 exec cgi tests, 2 malformed-ssi-directive tests, and 7 tests
+# 2 exec cgi tests, 2 malformed-ssi-directive tests, and 8 tests
# that use mod_bucketeer to construct brigades for mod_include
#
my $tests = keys %test;
-plan tests => $tests + 21, have_module 'include';
+plan tests => $tests + 22, have_module 'include';
foreach $doc (sort keys %test) {
ok t_cmp($test{$doc},
@@ -255,9 +255,16 @@
"GET $dir$doc"
);
+ $expected= "BeforeIfElseBlockAfterIf";
+ $doc = "bucketeer/y6.shtml";
+ ok t_cmp($expected,
+ super_chomp(GET_BODY "$dir$doc"),
+ "GET $dir$doc"
+ );
+
}
else {
- for (1..7) {
+ for (1..8) {
skip "Skipping bucket boundary tests, no mod_bucketeer", 1;
}
}