dougm 01/04/19 10:31:10
Modified: t/filter/TestFilter buckets.pm
Log:
adjust APR::Bucket->readapi change
Revision Changes Path
1.2 +2 -1 modperl-2.0/t/filter/TestFilter/buckets.pm
Index: buckets.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/filter/TestFilter/buckets.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- buckets.pm 2001/04/18 05:11:14 1.1
+++ buckets.pm 2001/04/19 17:31:06 1.2
@@ -20,7 +20,8 @@
for (my $bucket = $bb->first; $bucket; $bucket = $bb->next($bucket)) {
ok $bucket->type->name;
ok $bucket->length == 2;
- ok $bucket->read eq 'ok';
+ $bucket->read(my $data);
+ ok $data eq 'ok';
}
my $tests = Apache::TestToString->finish;
