You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by jk...@apache.org on 2013/02/20 15:36:58 UTC
svn commit: r1448187 -
/perl/modperl/branches/httpd24/t/response/TestAPI/aplog.pm
Author: jkaluza
Date: Wed Feb 20 14:36:57 2013
New Revision: 1448187
URL: http://svn.apache.org/r1448187
Log:
* t/response/TestAPI/aplog.pm: Set loglevel to LOG_DEBUG for tests which need it
Modified:
perl/modperl/branches/httpd24/t/response/TestAPI/aplog.pm
Modified: perl/modperl/branches/httpd24/t/response/TestAPI/aplog.pm
URL: http://svn.apache.org/viewvc/perl/modperl/branches/httpd24/t/response/TestAPI/aplog.pm?rev=1448187&r1=1448186&r2=1448187&view=diff
==============================================================================
--- perl/modperl/branches/httpd24/t/response/TestAPI/aplog.pm (original)
+++ perl/modperl/branches/httpd24/t/response/TestAPI/aplog.pm Wed Feb 20 14:36:57 2013
@@ -59,6 +59,9 @@ sub handler {
# log_serror
{
+ my $orig_log_level = $s->loglevel;
+
+ $s->loglevel(Apache2::Const::LOG_DEBUG);
t_server_log_warn_is_expected();
$s->log_serror(Apache2::Log::LOG_MARK,
Apache2::Const::LOG_INFO|Apache2::Const::LOG_STARTUP,
@@ -85,6 +88,7 @@ sub handler {
ok t_cmp $logdiff->diff,
qr/$egeneral: log_serror test 2/,
'$s->log_serror(LOG_MARK, LOG_DEBUG, APR::Const::EGENERAL...)';
+ $s->loglevel($orig_log_level);
}
# log_rerror