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 pg...@apache.org on 2006/01/08 00:19:09 UTC
svn commit: r366940 -
/perl/modperl/trunk/ModPerl-Registry/t/fatalstobrowser.t
Author: pgollucci
Date: Sat Jan 7 15:19:07 2006
New Revision: 366940
URL: http://svn.apache.org/viewcvs?rev=366940&view=rev
Log:
add missing t_client_log_error_is_expected()
Modified:
perl/modperl/trunk/ModPerl-Registry/t/fatalstobrowser.t
Modified: perl/modperl/trunk/ModPerl-Registry/t/fatalstobrowser.t
URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/ModPerl-Registry/t/fatalstobrowser.t?rev=366940&r1=366939&r2=366940&view=diff
==============================================================================
--- perl/modperl/trunk/ModPerl-Registry/t/fatalstobrowser.t (original)
+++ perl/modperl/trunk/ModPerl-Registry/t/fatalstobrowser.t Sat Jan 7 15:19:07 2006
@@ -2,13 +2,16 @@
use warnings FATAL => 'all';
use Apache::Test;
-use Apache::TestUtil qw(t_cmp t_write_perl_script);
+use Apache::TestUtil qw(
+ t_cmp t_write_perl_script
+ t_client_log_error_is_expected
+ );
use Apache::TestRequest qw(GET);
use File::Spec::Functions qw(catfile);
plan tests => 4, need need_module(qw(alias)),
- need_cgi,
+ need_cgi;
need_min_module_version CGI => 3.16,
skip_reason('fatalsToBrowser known not to work');
@@ -25,6 +28,8 @@
ok t_cmp($res->code,
200,
"error intercepted");
+
+ t_client_log_error_is_expected();
ok t_cmp($res->content,
qr/uninitiated_scalar/,