geoff 2003/11/15 19:32:21
Modified: src/modules/perl modperl_filter.c
Log:
remove call to deprecated APR_BRIGADE_FOREACH
see apr_buckets.h
Revision Changes Path
1.73 +4 -1 modperl-2.0/src/modules/perl/modperl_filter.c
Index: modperl_filter.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_filter.c,v
retrieving revision 1.72
retrieving revision 1.73
diff -u -r1.72 -r1.73
--- modperl_filter.c 7 Oct 2003 01:04:13 -0000 1.72
+++ modperl_filter.c 16 Nov 2003 03:32:21 -0000 1.73
@@ -1088,7 +1088,10 @@
fprintf(fp, "dump of brigade 0x%lx\n",
(unsigned long)bb);
- APR_BRIGADE_FOREACH(bucket, bb) {
+ for (bucket = APR_BRIGADE_FIRST(bb);
+ bucket != APR_BRIGADE_SENTINEL(bb);
+ bucket = APR_BUCKET_NEXT(bucket))
+ {
fprintf(fp, " %d: bucket=%s(0x%lx), length=%ld, data=0x%lx\n",
i, bucket->type->name,
(unsigned long)bucket,
