Author: pgollucci Date: Thu Aug 24 23:55:51 2006 New Revision: 436684 URL: http://svn.apache.org/viewvc?rev=436684&view=rev Log: adapt _error_log() to print out Apache::SizeLimit or Apache2::SizeLimit as appropriate
Modified: perl/Apache-SizeLimit/trunk/lib/Apache/BaseSizeLimit.pm perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests.t perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests2.t Modified: perl/Apache-SizeLimit/trunk/lib/Apache/BaseSizeLimit.pm URL: http://svn.apache.org/viewvc/perl/Apache-SizeLimit/trunk/lib/Apache/BaseSizeLimit.pm?rev=436684&r1=436683&r2=436684&view=diff ============================================================================== --- perl/Apache-SizeLimit/trunk/lib/Apache/BaseSizeLimit.pm (original) +++ perl/Apache-SizeLimit/trunk/lib/Apache/BaseSizeLimit.pm Thu Aug 24 23:55:51 2006 @@ -92,7 +92,7 @@ my $class = shift; print STDERR "[", scalar( localtime(time) ), - "] ($$) Apache::SizeLimit @_\n"; + "] ($$) " . ref($class) . " @_\n"; } sub _limits_are_exceeded { Modified: perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests.t URL: http://svn.apache.org/viewvc/perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests.t?rev=436684&r1=436683&r2=436684&view=diff ============================================================================== --- perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests.t (original) +++ perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests.t Thu Aug 24 23:55:51 2006 @@ -12,5 +12,5 @@ Apache::TestUtil::t_start_error_log_watch(); my $res = GET $url; -my $c = grep { / Apache::SizeLimit httpd process too big/ } Apache::TestUtil::t_finish_error_log_watch(); +my $c = grep { / Apache2::SizeLimit httpd process too big/ } Apache::TestUtil::t_finish_error_log_watch(); ok $c == 1; Modified: perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests2.t URL: http://svn.apache.org/viewvc/perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests2.t?rev=436684&r1=436683&r2=436684&view=diff ============================================================================== --- perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests2.t (original) +++ perl/Apache-SizeLimit/trunk/t/apache2/check_n_requests2.t Thu Aug 24 23:55:51 2006 @@ -12,5 +12,5 @@ Apache::TestUtil::t_start_error_log_watch(); my $res = GET $url; -my $c = grep { /Apache::SizeLimit httpd process too big/ } Apache::TestUtil::t_finish_error_log_watch(); +my $c = grep { /Apache2::SizeLimit httpd process too big/ } Apache::TestUtil::t_finish_error_log_watch(); ok $c == 0;