geoff 2004/01/19 08:19:09
Modified: t/response/TestAPI aplog.pm Log: ack! last commit had changes other than those logged. revert to 1.12 Revision Changes Path 1.15 +4 -4 modperl-2.0/t/response/TestAPI/aplog.pm Index: aplog.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/aplog.pm,v retrieving revision 1.14 retrieving revision 1.15 diff -u -r1.14 -r1.15 --- aplog.pm 19 Jan 2004 16:15:13 -0000 1.14 +++ aplog.pm 19 Jan 2004 16:19:09 -0000 1.15 @@ -31,7 +31,7 @@ $rlog->info($package, " test in progress"); - my($file, $line) = Apache::Log::LOG_MARK; + my($file, $line) = Apache::LOG_MARK; ok $file eq __FILE__; ok $line == __LINE__ - 2; @@ -41,7 +41,7 @@ ok sub { $slog->can($method) }; } - $s->log_serror(Apache::Log::LOG_MARK, Apache::LOG_INFO|Apache::LOG_STARTUP, + $s->log_serror(Apache::LOG_MARK, Apache::LOG_INFO|Apache::LOG_STARTUP, APR::SUCCESS, "This log message comes with no header"); t_server_log_warn_is_expected(); @@ -49,11 +49,11 @@ APR::SUCCESS, "log_serror test ok"); t_server_log_warn_is_expected(); - $s->log_serror(Apache::Log::LOG_MARK, Apache::LOG_DEBUG, + $s->log_serror(Apache::LOG_MARK, Apache::LOG_DEBUG, APR::EGENERAL, "log_serror test 2 ok"); t_server_log_error_is_expected(); - $r->log_rerror(Apache::Log::LOG_MARK, Apache::LOG_CRIT, + $r->log_rerror(Apache::LOG_MARK, Apache::LOG_CRIT, APR::ENOTIME, "log_rerror test ok"); t_server_log_error_is_expected();