Author: pgollucci Date: Wed Oct 12 17:49:53 2005 New Revision: 319405 URL: http://svn.apache.org/viewcvs?rev=319405&view=rev Log: Fix the regex against executable names. Submitted by: Stas
Modified: perl/modperl/trunk/t/response/TestDirective/perldo.pm Modified: perl/modperl/trunk/t/response/TestDirective/perldo.pm URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/t/response/TestDirective/perldo.pm?rev=319405&r1=319404&r2=319405&view=diff ============================================================================== --- perl/modperl/trunk/t/response/TestDirective/perldo.pm (original) +++ perl/modperl/trunk/t/response/TestDirective/perldo.pm Wed Oct 12 17:49:53 2005 @@ -40,7 +40,8 @@ ok $TestDirective::perl::line > 3; ok !t_cmp($0, '-e', '$0'); - ok t_cmp($0, qr/httpd|apache\.exe/i, '$0'); + my $target = Apache::Test::vars('target'); + ok t_cmp($0, qr/$target/i, '$0'); ok t_cmp($TestDirective::perl::Included, 1, "Include");