Author: pgollucci Date: Mon Mar 26 07:58:19 2007 New Revision: 522536 URL: http://svn.apache.org/viewvc?view=rev&rev=522536 Log: apply
Fix Can't call method "child_terminate" on an undefined value By add_cleanup_handler() pass $r to _exit_if_to_big() via shift [David Wheeler <[EMAIL PROTECTED]>] from http://svn.apache.org/viewvc?view=rev&revision=428211 Modified: perl/modperl/branches/1.x/lib/Apache/SizeLimit.pm Modified: perl/modperl/branches/1.x/lib/Apache/SizeLimit.pm URL: http://svn.apache.org/viewvc/perl/modperl/branches/1.x/lib/Apache/SizeLimit.pm?view=diff&rev=522536&r1=522535&r2=522536 ============================================================================== --- perl/modperl/branches/1.x/lib/Apache/SizeLimit.pm (original) +++ perl/modperl/branches/1.x/lib/Apache/SizeLimit.pm Mon Mar 26 07:58:19 2007 @@ -92,7 +92,7 @@ # PerlCleanupHandler phase. That means that there's no way to use # $r->get_handlers() to check the results of calling this method. $r->push_handlers( 'PerlCleanupHandler', - sub { $class->_exit_if_too_big() } ); + sub { $class->_exit_if_too_big(shift) } ); $r->pnotes( size_limit_cleanup => 1 ); }