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/,