--- src/mod_persistentperl2.c	2003-10-12 06:48:59.000000000 +0200
+++ src/mod_persistentperl2.c.oden	2006-02-10 13:35:56.000000000 +0100
@@ -340,7 +340,10 @@
     const char *buf;
     apr_size_t len;
     apr_status_t rv;
-    APR_BRIGADE_FOREACH(e, bb) {
+    for (e = APR_BRIGADE_FIRST(bb);
+         e != APR_BRIGADE_SENTINEL(bb);
+         e = APR_BUCKET_NEXT(e)) {
+
         if (APR_BUCKET_IS_EOS(e)) {
             break;
         }
@@ -465,7 +468,10 @@
             return rv;
         }
 
-        APR_BRIGADE_FOREACH(bucket, bb) {
+	for (bucket = APR_BRIGADE_FIRST(bb);
+         bucket != APR_BRIGADE_SENTINEL(bb);
+         bucket = APR_BUCKET_NEXT(bucket)) {
+
             const char *data;
             apr_size_t len;