svn commit: r159603 - perl/modperl/trunk/t/response/TestAPI/server_util.pm

[geoff]

Author: geoff
Date: Thu Mar 31 07:22:44 2005
New Revision: 159603

URL: http://svn.apache.org/viewcvs?view=rev&rev=159603
Log:
alter count to match new TestExit::FromPerlModule handler

Modified:
    perl/modperl/trunk/t/response/TestAPI/server_util.pm

Modified: perl/modperl/trunk/t/response/TestAPI/server_util.pm
URL: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/t/response/TestAPI/server_util.pm?view=diff&r1=159602&r2=159603
==============================================================================
--- perl/modperl/trunk/t/response/TestAPI/server_util.pm (original)
+++ perl/modperl/trunk/t/response/TestAPI/server_util.pm Thu Mar 31 07:22:44 
2005
@@ -33,7 +33,7 @@
 
     {
         my $s = $r->server;
-        my @expected = qw(ModPerl::Test::exit_handler);
+        my @expected = qw(ModPerl::Test::exit_handler 
TestExit::FromPerlModule::exit_handler);
         my @handlers =
             @{ $s->get_handlers('PerlChildExitHandler') || []};
         ok t_cmp(scalar(@handlers), scalar(@expected), "get_handlers");