perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From ge...@apache.org
Subject svn commit: r159603 - perl/modperl/trunk/t/response/TestAPI/server_util.pm
Date Thu, 31 Mar 2005 15:22:44 GMT
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");



Mime
View raw message