while ($filter->read(my $buffer, $wanted)) {
$filter->print($buffer);
}You will write:
while (defined(my $buffer = $filter->read($wanted))) {
$filter->print($buffer);
}The existing API is badly broken, since there is no way to break the while loop in case of an error. It was working perfectly when there are no errors.
Errors are now checked internally and exceptions are thrown if anything goes wrong.
I've adjusted all the tests and they all pass fine. Let me know if you have any problem with that change.
-- __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
