Index: t/apache/limits.t
===================================================================
RCS file: /home/cvspublic/httpd-test/perl-framework/t/apache/limits.t,v
retrieving revision 1.12
diff -u -r1.12 limits.t
--- t/apache/limits.t	9 May 2002 07:14:36 -0000	1.12
+++ t/apache/limits.t	10 Dec 2003 19:24:30 -0000
@@ -59,11 +59,13 @@
 my $subtests = (@conditions * 2) + 2;
 plan tests => $subtests, \&have_lwp;
 
+use vars qw($expected_rc);
+
 my $testnum = 1;
 foreach my $cond (@conditions) {
     foreach my $goodbad (qw(succeed fail)) {
         my $param = $params{"$cond-$goodbad"};
-        my $expected_rc = $xrcs{"$cond-$goodbad"};
+        $expected_rc = $xrcs{"$cond-$goodbad"};
         my $resp;
         if ($cond eq 'fieldcount') {
             my %fields;
@@ -109,6 +111,14 @@
                         $req->header('X-Subtest' => $testnum);
                         $req->content(chunk_it($param));
                         $resp = Apache::TestRequest::user_agent->request($req);
+
+                        # limit errors with chunked request bodies get
+                        # 400 with 1.3, not 413 - see special chunked
+                        # request handling in ap_get_client_block in 1.3
+
+                        local $expected_rc = 400 if $goodbad eq 'fail' &&
+                                                    have_apache(1); 
+
                         ok t_cmp($expected_rc,
                                  $resp->code,
                                  "Test #$testnum");