stas 2002/08/13 19:31:12
Modified: perl-framework/Apache-Test/lib/Apache TestConfig.pm
Log:
apxs post-2.0.40 adds a new line, so we strip it
Revision Changes Path
1.141 +1 -0
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
Index: TestConfig.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.140
retrieving revision 1.141
diff -u -r1.140 -r1.141
--- TestConfig.pm 7 Jul 2002 19:06:47 -0000 1.140
+++ TestConfig.pm 14 Aug 2002 02:31:11 -0000 1.141
@@ -1285,6 +1285,7 @@
my($self, $q, $ok_fail) = @_;
return unless $self->{APXS};
my $val = qx($self->{APXS} -q $q 2>/dev/null);
+ chomp $val if defined $val; # apxs post-2.0.40 adds a new line
unless ($val) {
if ($ok_fail) {
return "";